diff options
-rw-r--r-- | gen/test/gleam@list_test.erl | 4 | ||||
-rw-r--r-- | test/gleam/list_test.gleam | 7 |
2 files changed, 7 insertions, 4 deletions
diff --git a/gen/test/gleam@list_test.erl b/gen/test/gleam@list_test.erl index 2411f0b..fb04d25 100644 --- a/gen/test/gleam@list_test.erl +++ b/gen/test/gleam@list_test.erl @@ -187,6 +187,10 @@ sort_test() -> gleam@list:sort([4, 3, 6, 5, 4, 1], fun gleam@int:compare/2), [1, 3, 4, 4, 5, 6] ), + gleam@expect:equal( + gleam@list:sort([4.1, 3.1, 6.1, 5.1, 4.1], fun gleam@float:compare/2), + [3.1, 4.1, 4.1, 5.1, 6.1] + ), gleam@expect:equal(gleam@list:sort([], fun gleam@int:compare/2), []). index_map_test() -> diff --git a/test/gleam/list_test.gleam b/test/gleam/list_test.gleam index 46e14ea..bb9168a 100644 --- a/test/gleam/list_test.gleam +++ b/test/gleam/list_test.gleam @@ -267,10 +267,9 @@ pub fn sort_test() { |> list:sort(_, int:compare) |> expect:equal(_, [1, 3, 4, 4, 5, 6]) - // TODO: Requires float:compare - // [4.1, 3.1, 6.1, 5.1, 4.1] - // |> list:sort(_, float:compare) - // |> expect:equal(_, [3.1, 4.1, 4.1, 5.1, 6.1]) + [4.1, 3.1, 6.1, 5.1, 4.1] + |> list:sort(_, float:compare) + |> expect:equal(_, [3.1, 4.1, 4.1, 5.1, 6.1]) [] |> list:sort(_, int:compare) |