From 2c2541750ca4b7b604070c75c18d84be833c97d5 Mon Sep 17 00:00:00 2001 From: Louis Pilfold Date: Tue, 25 Jun 2019 22:48:07 +0100 Subject: stdlib namespace std -> gleam --- src/std/tuple.gleam | 29 ----------------------------- 1 file changed, 29 deletions(-) delete mode 100644 src/std/tuple.gleam (limited to 'src/std/tuple.gleam') diff --git a/src/std/tuple.gleam b/src/std/tuple.gleam deleted file mode 100644 index ab38a74..0000000 --- a/src/std/tuple.gleam +++ /dev/null @@ -1,29 +0,0 @@ -import std/list - -pub fn new(a, b) { - {a, b} -} - -pub fn first(tup) { - let {a, _} = tup - a -} - -pub fn second(tup) { - let {_, a} = tup - a -} - -pub fn swap(tup) { - let {a, b} = tup - {b, a} -} - -pub fn fetch(haystack, needle) { - list:find(haystack, fn(tuple) { - case first(tuple) == needle { - | True -> tuple |> second |> Ok - | False -> Error([]) - } - }) -} -- cgit v1.2.3