Update tests/unit/t_iter.ml

This commit is contained in:
Simon Cruanes 2023-11-15 22:11:56 -05:00 committed by GitHub
parent 200999d09e
commit 6f4c4bd9c2
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

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