From 7275a9ef72e79bbf33a47abdb72b4596a10505d8 Mon Sep 17 00:00:00 2001 From: Robert Peterson Date: Tue, 16 Apr 2019 15:23:19 -0700 Subject: Add list:all --- test/list_test.gleam | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'test') diff --git a/test/list_test.gleam b/test/list_test.gleam index c0a16ae..a24c7b8 100644 --- a/test/list_test.gleam +++ b/test/list_test.gleam @@ -162,3 +162,14 @@ pub fn find_test() { |> list:find(_, f) |> expect:is_error } + +pub fn all_test() { + list:all([1,2,3,4,5], fn(x) { x > 0 }) + |> expect:equal(_, True) + + list:all([1,2,3,4,5], fn(x) { x < 0 }) + |> expect:equal(_, False) + + list:all([], fn(_) { False }) + |> expect:equal(_, True) +} -- cgit v1.2.3