fix build for benchs

This commit is contained in:
Simon Cruanes 2018-01-21 17:09:30 -06:00
parent c7483ade3b
commit 7df23d0cca
3 changed files with 3 additions and 17 deletions

View file

@ -16,7 +16,7 @@ doc:
BENCH_TARGETS=run_benchs.exe run_bench_hash.exe
benchs:
jbuilder build $(addprefix bench/, $(BENCH_TARGETS))
jbuilder build $(addprefix benchs/, $(BENCH_TARGETS))
examples:
jbuilder build examples/id_sexp.exe
@ -39,4 +39,4 @@ reindent:
@find src '(' -name '*.ml' -or -name '*.mli' ')' -type f -print0 | xargs -0 echo "reindenting: "
@find src '(' -name '*.ml' -or -name '*.mli' ')' -type f -print0 | xargs -0 ocp-indent -i
.PHONY: all test clean build doc update_next_tag watch
.PHONY: all benchs test clean build doc update_next_tag watch

View file

@ -2,7 +2,7 @@
(executables
((names (run_benchs run_bench_hash))
(libraries (containers containers.data containers.iter
containers.thread benchmark gen sequence))
containers.thread benchmark gen sequence qcheck))
(flags (:standard -w +a-4-42-44-48-50-58-32-60@8 -safe-string -color always))
(ocamlopt_flags (:standard -O3 -color always
-unbox-closures -unbox-closures-factor 20))

View file

@ -513,19 +513,6 @@ module Tbl = struct
let module U = MUT_OF_IMMUT(T) in
(module U : MUT with type key = a)
let flat_hashtbl =
let module T = CCFlatHashtbl.Make(CCInt) in
let module U = struct
type key = int
type 'a t = 'a T.t
let name = "ccflat_hashtbl"
let create = T.create
let find = T.find_exn
let add = T.add
let replace = T.add
end in
(module U : INT_MUT)
let trie : (module MUT with type key = string) =
let module T = struct
let name = "trie(string)"
@ -584,7 +571,6 @@ module Tbl = struct
(* ; poly_hashtbl *)
; map Int
; wbt Int
; flat_hashtbl
; hashtrie Int
; hashtrie_mut Int
(* ; hamt Int *)