aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/gleam/list_test.gleam17
-rw-r--r--test/gleam/pair_test.gleam16
2 files changed, 17 insertions, 16 deletions
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
-// }