From 01a691b6e7df1834b1f75e07617a209770c48fbf Mon Sep 17 00:00:00 2001 From: Alice Dee Date: Tue, 17 Sep 2019 12:45:44 +0100 Subject: Move fetch to list module as key_find --- test/gleam/list_test.gleam | 17 +++++++++++++++++ test/gleam/pair_test.gleam | 16 ---------------- 2 files changed, 17 insertions(+), 16 deletions(-) (limited to 'test') diff --git a/test/gleam/list_test.gleam b/test/gleam/list_test.gleam index e211947..cdb7a8d 100644 --- a/test/gleam/list_test.gleam +++ b/test/gleam/list_test.gleam @@ -358,3 +358,20 @@ pub fn split_while_test() { list.split_while([1, 2, 3, 4, 5], fn(x) { x <= -3 }) |> expect.equal(_, pair.Pair([], [1, 2, 3, 4, 5])) } + + +pub fn key_find_test() { + let proplist = [pair.Pair(0, "1"), pair.Pair(1, "2")] + + proplist + |> list.key_find(_, 0) + |> expect.equal(_, Ok("1")) + + proplist + |> list.key_find(_, 1) + |> expect.equal(_, Ok("2")) + + proplist + |> list.key_find(_, 2) + |> expect.is_error +} diff --git a/test/gleam/pair_test.gleam b/test/gleam/pair_test.gleam index 86a9e1e..d8cb324 100644 --- a/test/gleam/pair_test.gleam +++ b/test/gleam/pair_test.gleam @@ -18,19 +18,3 @@ pub fn swap_test() { |> pair.swap |> expect.equal(_, pair.Pair("2", 1)) } - -// pub fn fetch_test() { -// let proplist = [pair.Pair(0, "1"), pair.Pair(1, "2")] - -// proplist -// |> pair.fetch(_, 0) -// |> expect.equal(_, Ok("1")) - -// proplist -// |> pair.fetch(_, 1) -// |> expect.equal(_, Ok("2")) - -// proplist -// |> pair.fetch(_, 2) -// |> expect.is_error -// } -- cgit v1.2.3