aboutsummaryrefslogtreecommitdiff
path: root/gen/test/gleam@any_test.erl
diff options
context:
space:
mode:
authorLouis Pilfold <louis@lpil.uk>2019-11-24 22:13:34 +0000
committerLouis Pilfold <louis@lpil.uk>2019-11-25 11:22:45 +0000
commit69b0e8e1abb78db55cbdbd8db3ba4fe75b743e60 (patch)
tree47eec11c69fecb4033b33bd0987992e51b41f49c /gen/test/gleam@any_test.erl
parent09bd0a89dd80500d99589646a738c45c9537091a (diff)
downloadgleam_stdlib-69b0e8e1abb78db55cbdbd8db3ba4fe75b743e60.tar.gz
gleam_stdlib-69b0e8e1abb78db55cbdbd8db3ba4fe75b743e60.zip
Update for Gleam v0.5
Diffstat (limited to 'gen/test/gleam@any_test.erl')
-rw-r--r--gen/test/gleam@any_test.erl32
1 files changed, 1 insertions, 31 deletions
diff --git a/gen/test/gleam@any_test.erl b/gen/test/gleam@any_test.erl
index ed58ebf..b7e472d 100644
--- a/gen/test/gleam@any_test.erl
+++ b/gen/test/gleam@any_test.erl
@@ -1,7 +1,7 @@
-module(gleam@any_test).
-compile(no_auto_import).
--export([string_test/0, int_test/0, float_test/0, thunk_test/0, bool_test/0, atom_test/0, list_test/0, pair_test/0, field_test/0]).
+-export([string_test/0, int_test/0, float_test/0, thunk_test/0, bool_test/0, atom_test/0, list_test/0, field_test/0]).
string_test() ->
gleam@expect:equal(gleam@any:string(gleam@any:from(<<"">>)), {ok, <<"">>}),
@@ -117,36 +117,6 @@ list_test() ->
)
).
-pair_test() ->
- gleam@expect:equal(
- gleam@any:pair(gleam@any:from({1, []})),
- {ok, {gleam@any:from(1), gleam@any:from([])}}
- ),
- gleam@expect:equal(
- gleam@any:pair(gleam@any:from({<<"ok">>, <<"ok">>})),
- {ok, {gleam@any:from(<<"ok">>), gleam@any:from(<<"ok">>)}}
- ),
- gleam@expect:equal(
- gleam@result:then(
- gleam@result:then(
- gleam@any:pair(gleam@any:from({1, 2.0})),
- fun(X) ->
- gleam@result:map(
- gleam@any:int(gleam@pair:first(X)),
- fun(F) -> {F, gleam@pair:second(X)} end
- )
- end
- ),
- fun(X) ->
- gleam@result:map(
- gleam@any:float(gleam@pair:second(X)),
- fun(F) -> {gleam@pair:first(X), F} end
- )
- end
- ),
- {ok, {1, 2.0}}
- ).
-
field_test() ->
{ok, OkAtom} = gleam@atom:from_string(<<"ok">>),
{ok, ErrorAtom} = gleam@atom:from_string(<<"error">>),