diff options
author | Louis Pilfold <louis@lpil.uk> | 2019-11-24 22:13:34 +0000 |
---|---|---|
committer | Louis Pilfold <louis@lpil.uk> | 2019-11-25 11:22:45 +0000 |
commit | 69b0e8e1abb78db55cbdbd8db3ba4fe75b743e60 (patch) | |
tree | 47eec11c69fecb4033b33bd0987992e51b41f49c /gen/test/gleam@any_test.erl | |
parent | 09bd0a89dd80500d99589646a738c45c9537091a (diff) | |
download | gleam_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.erl | 32 |
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">>), |