aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLouis Pilfold <louis@lpil.uk>2019-09-17 21:45:22 +0100
committerLouis Pilfold <louis@lpil.uk>2019-09-17 21:57:16 +0100
commitdcf7b566a74c9388f491cbb14454c3789868ba30 (patch)
tree910f129febc55333bbae50a891d7530aad4859da
parentac354a3495feeea5efbeaea7d3d82020e66ee0c4 (diff)
downloadgleam_stdlib-dcf7b566a74c9388f491cbb14454c3789868ba30.tar.gz
gleam_stdlib-dcf7b566a74c9388f491cbb14454c3789868ba30.zip
Correct type definition of Nil
-rw-r--r--gen/src/gleam@tuple.erl28
-rw-r--r--gen/test/gleam@tuple_test.erl23
2 files changed, 0 insertions, 51 deletions
diff --git a/gen/src/gleam@tuple.erl b/gen/src/gleam@tuple.erl
deleted file mode 100644
index 30c553c..0000000
--- a/gen/src/gleam@tuple.erl
+++ /dev/null
@@ -1,28 +0,0 @@
--module(gleam@tuple).
--compile(no_auto_import).
-
--export([new/2, first/1, second/1, swap/1, fetch/2]).
-
-new(A, B) ->
- {A, B}.
-
-first(Tup) ->
- {A, _} = Tup,
- A.
-
-second(Tup) ->
- {_, A} = Tup,
- A.
-
-swap(Tup) ->
- {A, B} = Tup,
- {B, A}.
-
-fetch(Haystack, Needle) ->
- gleam@list:find(Haystack, fun(Tuple) -> case first(Tuple) =:= Needle of
- true ->
- {ok, second(Tuple)};
-
- false ->
- {error, []}
- end end).
diff --git a/gen/test/gleam@tuple_test.erl b/gen/test/gleam@tuple_test.erl
deleted file mode 100644
index c705c74..0000000
--- a/gen/test/gleam@tuple_test.erl
+++ /dev/null
@@ -1,23 +0,0 @@
--module(gleam@tuple_test).
--compile(no_auto_import).
-
--export([new_test/0, first_test/0, second_test/0, swap_test/0, fetch_test/0]).
-
-new_test() ->
- gleam@expect:equal(gleam@tuple:new(1, 2), {1, 2}),
- gleam@expect:equal(gleam@tuple:new(2, <<"3">>), {2, <<"3">>}).
-
-first_test() ->
- gleam@expect:equal(gleam@tuple:first({1, 2}), 1).
-
-second_test() ->
- gleam@expect:equal(gleam@tuple:second({1, 2}), 2).
-
-swap_test() ->
- gleam@expect:equal(gleam@tuple:swap({1, <<"2">>}), {<<"2">>, 1}).
-
-fetch_test() ->
- Proplist = [{0, <<"1">>}, {1, <<"2">>}],
- gleam@expect:equal(gleam@tuple:fetch(Proplist, 0), {ok, <<"1">>}),
- gleam@expect:equal(gleam@tuple:fetch(Proplist, 1), {ok, <<"2">>}),
- gleam@expect:is_error(gleam@tuple:fetch(Proplist, 2)).