simon/iter
1
0
Fork 0
mirror of https://github.com/c-cube/iter.git synced 2025-12-06 11:15:32 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix test

Browse source
This commit is contained in:
Simon Cruanes 2016-03-07 14:19:13 +01:00
parent 243f81ae88
commit 3cac917045
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
tests/test_sequence.ml
View file

@ -68,9 +68,9 @@ let test_concat2 () =
|> S.length
|> OUnit.assert_equal 2000
let test_flatMap () =
let test_flat_map () =
S.(1 -- 1000)
|> S.flatMap (fun i -> S.(i -- (i+1)))
|> S.flat_map (fun i -> S.(i -- (i+1)))
|> S.length
|> OUnit.assert_equal 2000
@ -237,7 +237,7 @@ let suite =
"test_exists" >:: test_exists;
"test_length" >:: test_length;
"test_concat" >:: test_concat;
"test_flatMap" >:: test_flatMap;
"test_flatMap" >:: test_flat_map;
"test_intersperse" >:: test_intersperse;
"test_not_persistent" >:: test_not_persistent;
"test_persistent" >:: test_persistent;