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

test

Browse source
This commit is contained in:
Simon Cruanes 2022-07-05 21:29:03 -04:00
parent af77f371fd
commit b7d19e9dc5
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
tests/data/t_bv.ml
View file

@ -781,7 +781,8 @@ module Ref_ = struct
end end
;; ;;
q ~name:"list ops: invariant" ~max_fail:1 ~count:20_000 Op.arb_l (fun ops -> q ~name:"list ops: invariant" ~max_fail:1 ~long_factor:10 ~count:20_000 Op.arb_l
(fun ops ->
let bv = empty () in let bv = empty () in
Internal_.__check_invariant bv; Internal_.__check_invariant bv;
@ -793,7 +794,8 @@ q ~name:"list ops: invariant" ~max_fail:1 ~count:20_000 Op.arb_l (fun ops ->
true) true)
;; ;;
q ~name:"list ops: compare to ref" ~max_fail:1 ~count:2_000 Op.arb_l (fun ops -> q ~name:"list ops: compare to ref" ~max_fail:1 ~long_factor:10 ~count:2_000
Op.arb_l (fun ops ->
let bv = empty () in let bv = empty () in
let bv' = Ref_.empty () in let bv' = Ref_.empty () in