simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2026-03-07 21:27:55 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

forgot to format
Some checks failed
format / format (push) Has been cancelled
Details
Build and Test / build (push) Has been cancelled
Details

Browse source
This commit is contained in:
Simon Cruanes 2026-02-14 21:08:29 -05:00
parent 42bfe9c8c6
commit bc9f361e56
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 9 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
tests/pvec/t_pvec.ml
View file

@ -266,13 +266,15 @@ module Op = struct
list_small gen_x >|= fun l ->
Append l, size + List.length l );
];
(if size < 10_000 then [
(* flat map can explode, only do it if list isn't too big *)
( 1,
list_size (0 -- 5) gen_x >|= fun l ->
Flat_map l, size * (1 + List.length l) );
] else [])
;
(if size < 10_000 then
[
(* flat map can explode, only do it if list isn't too big *)
( 1,
list_size (0 -- 5) gen_x >|= fun l ->
Flat_map l, size * (1 + List.length l) );
]
else
[]);
]
in