Update tests/unit/t_iter.ml

This commit is contained in:
Simon Cruanes 2023-11-15 22:11:56 -05:00
parent 4bf00eabad
commit 63c99cf2ba

View file

@ -247,7 +247,7 @@ let () =
let () = let () =
OUnit.assert_equal OUnit.assert_equal
~cmp:(List.equal Int.equal) ~cmp:(CCList.equal Int.equal)
(1 -- 10 (1 -- 10
|> map_while (fun x -> if x = 7 then `Stop else `Yield (x - 1)) |> map_while (fun x -> if x = 7 then `Stop else `Yield (x - 1))
|> to_list) |> to_list)