diff options
| author | Alice Dee <alice.dee@guardian.co.uk> | 2019-09-17 12:45:44 +0100 |
|---|---|---|
| committer | Louis Pilfold <louis@lpil.uk> | 2019-09-17 12:59:32 +0100 |
| commit | 01a691b6e7df1834b1f75e07617a209770c48fbf (patch) | |
| tree | 58a8e99dd313d975c38dbd24effe1f381c326858 /src | |
| parent | 198beba763f8bc0fd35b5b6ba36e42c5926ecc8c (diff) | |
| download | gleam_stdlib-01a691b6e7df1834b1f75e07617a209770c48fbf.tar.gz gleam_stdlib-01a691b6e7df1834b1f75e07617a209770c48fbf.zip | |
Move fetch to list module as key_find
Diffstat (limited to 'src')
| -rw-r--r-- | src/gleam/list.gleam | 9 | ||||
| -rw-r--r-- | src/gleam/pair.gleam | 9 |
2 files changed, 9 insertions, 9 deletions
diff --git a/src/gleam/list.gleam b/src/gleam/list.gleam index e0e7016..ed63a4b 100644 --- a/src/gleam/list.gleam +++ b/src/gleam/list.gleam @@ -312,3 +312,12 @@ fn do_split_while(list, f, acc) { pub fn split_while(list, f) { do_split_while(list, f, []) } + +pub fn key_find(haystack, needle) { + find(haystack, fn(p) { + case pair.first(p) == needle { + | True -> p |> pair.second |> Ok + | False -> Error(Nil) + } + }) +} diff --git a/src/gleam/pair.gleam b/src/gleam/pair.gleam index 7df33ca..0a51fd3 100644 --- a/src/gleam/pair.gleam +++ b/src/gleam/pair.gleam @@ -19,12 +19,3 @@ pub fn swap(tup) { let Pair(a, b) = tup Pair(b, a) } - -// pub fn fetch(haystack, needle) { -// list.find(haystack, fn(tuple) { -// case first(tuple) == needle { -// | True -> tuple |> second |> Ok -// | False -> Error([]) -// } -// }) -// } |