From e30190a7d0484c41d32a9f37cfc467056a72e774 Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Fri, 11 Sep 2015 09:57:56 +0200
Subject: [PATCH] rename some benchs

---
 benchs/run_benchs.ml | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/benchs/run_benchs.ml b/benchs/run_benchs.ml
index e10646d2..ebd7912a 100644
--- a/benchs/run_benchs.ml
+++ b/benchs/run_benchs.ml
@@ -248,7 +248,7 @@ module Tbl = struct
     let module U = struct
       type key = int
       type 'a t = 'a T.t ref
-      let name = "persistent_hashtbl"
+      let name = "ccpersistent_hashtbl"
       let create _ = ref (T.empty ())
       let find m k = T.find !m k
       let add m k v = m := T.replace !m k v
@@ -272,7 +272,7 @@ module Tbl = struct
     let module T = struct
       type key = int
       type 'a t = (int, 'a) PHashtbl.t
-      let name = "phashtbl"
+      let name = "cc_phashtbl"
       let create i = PHashtbl.create ~hash:CCInt.hash ~eq:CCInt.equal i
       let find = PHashtbl.find
       let add = PHashtbl.add
@@ -291,7 +291,7 @@ module Tbl = struct
   = fun k ->
     let (module K), name = arg_make k in
     let module T = struct
-      let name = sprintf "wbt(%s)" name
+      let name = sprintf "ccwbt(%s)" name
       include CCWBTree.Make(K)
       let find = get_exn
     end in