simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-06 11:15:31 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

make a test less slow

Browse source
This commit is contained in:
Simon Cruanes 2016-04-25 11:56:07 +02:00
parent 4cfb82a3fe
commit 24add9d4f7
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/data/CCTrie.ml
View file

@ -368,7 +368,7 @@ module Make(W : WORD)
*) *)
(*$Q (*$Q
Q.(pair (list (pair printable_string int)) printable_string) (fun (l,s) -> \ Q.(pair (list (pair (printable_string_of_size Gen.(0 -- 30)) int)) printable_string) (fun (l,s) -> \
let m = String.of_list l in \ let m = String.of_list l in \
let s' = String.longest_prefix s m in \ let s' = String.longest_prefix s m in \
CCString.prefix ~pre:s' s) CCString.prefix ~pre:s' s)