aboutsummaryrefslogtreecommitdiff
path: root/gen/tuple.erl
diff options
context:
space:
mode:
authorLouis Pilfold <louis@lpil.uk>2019-03-18 01:12:09 +0000
committerLouis Pilfold <louis@lpil.uk>2019-03-18 01:12:09 +0000
commit2cbe6bd721ae2be68c29e4de71db51bafc3478f8 (patch)
tree8bc1a3646d662fe047f45af4ba6a4c55e2ab6f09 /gen/tuple.erl
parent336614d8fc815d5eec7461ed271ae45697d9216c (diff)
downloadgleam_stdlib-2cbe6bd721ae2be68c29e4de71db51bafc3478f8.tar.gz
gleam_stdlib-2cbe6bd721ae2be68c29e4de71db51bafc3478f8.zip
tuple module, decode lists
Diffstat (limited to 'gen/tuple.erl')
-rw-r--r--gen/tuple.erl23
1 files changed, 23 insertions, 0 deletions
diff --git a/gen/tuple.erl b/gen/tuple.erl
new file mode 100644
index 0000000..270bb29
--- /dev/null
+++ b/gen/tuple.erl
@@ -0,0 +1,23 @@
+-module(tuple).
+-compile(no_auto_import).
+-include_lib("eunit/include/eunit.hrl").
+
+-export([first/1, second/1]).
+
+first(Tup) ->
+ {A, _} = Tup,
+ A.
+
+-ifdef(TEST).
+first_test() ->
+ expect:equal(first({1, 2}), 1).
+-endif.
+
+second(Tup) ->
+ {_, A} = Tup,
+ A.
+
+-ifdef(TEST).
+second_test() ->
+ expect:equal(second({1, 2}), 2).
+-endif.