mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2026-03-09 07:03:35 -04:00
Compare commits
1 commit
bc9f361e56
...
ec898e631f
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
ec898e631f |
2 changed files with 3 additions and 10 deletions
|
|
@ -4,7 +4,6 @@
|
|||
- fix leb128 slice bug
|
||||
- fix leb128 `Int64.min_int` bug
|
||||
- add tests for leb128 library (#486)
|
||||
- fix size explosion in `t_pvec.ml` found in CI
|
||||
- some breaking changes after the big bump to 4.08 as lower bound, thanks to @fardale for the cleanup
|
||||
* breaking: CCListLabel.compare and CCListLabel.equal takes the function on the elements as named arguments
|
||||
* breaking: CCListLabel.init now takes the length as a named arguments to follow the Stdlib
|
||||
|
|
|
|||
|
|
@ -265,16 +265,10 @@ module Op = struct
|
|||
( 1,
|
||||
list_small gen_x >|= fun l ->
|
||||
Append l, size + List.length l );
|
||||
( 1,
|
||||
list_size (0 -- 5) gen_x >|= fun l ->
|
||||
Flat_map l, size * (1 + 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
|
||||
[]);
|
||||
]
|
||||
in
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue