diff options
Diffstat (limited to 'gen/test/gleam@any_test.erl')
| -rw-r--r-- | gen/test/gleam@any_test.erl | 24 |
1 files changed, 11 insertions, 13 deletions
diff --git a/gen/test/gleam@any_test.erl b/gen/test/gleam@any_test.erl index e915fe7..59a5067 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, struct2_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, pair_test/0, field_test/0]). string_test() -> gleam@expect:equal(gleam@any:string(gleam@any:from(<<"">>)), {ok, <<"">>}), @@ -117,32 +117,30 @@ list_test() -> ) ). -struct2_test() -> +pair_test() -> gleam@expect:equal( - gleam@any:struct2(gleam@any:from({1, []})), + gleam@any:pair(gleam@any:from({1, []})), {ok, {gleam@any:from(1), gleam@any:from([])}} ), gleam@expect:equal( - gleam@any:struct2(gleam@any:from({<<"ok">>, <<"ok">>})), + gleam@any:pair(gleam@any:from({<<"ok">>, <<"ok">>})), {ok, {gleam@any:from(<<"ok">>), gleam@any:from(<<"ok">>)}} ), - gleam@expect:is_error(gleam@any:struct2(gleam@any:from({1}))), - gleam@expect:is_error(gleam@any:struct2(gleam@any:from({1, 2, 3}))), gleam@expect:equal( gleam@result:then( gleam@result:then( - gleam@any:struct2(gleam@any:from({1, 2.0})), + gleam@any:pair(gleam@any:from({1, 2.0})), fun(X) -> gleam@result:map( - gleam@any:int(gleam@tuple:first(X)), - fun(F) -> {F, gleam@tuple:second(X)} end + 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@tuple:second(X)), - fun(F) -> {gleam@tuple:first(X), F} end + gleam@any:float(gleam@pair:second(X)), + fun(F) -> {gleam@pair:first(X), F} end ) end ), @@ -151,7 +149,7 @@ struct2_test() -> field_test() -> {ok, OkAtom} = gleam@atom:from_string(<<"ok">>), - {ok, EarlierAtom} = gleam@atom:from_string(<<"earlier">>), + {ok, ErrorAtom} = gleam@atom:from_string(<<"error">>), gleam@expect:equal( gleam@any:field( gleam@any:from(gleam@map:put(gleam@map:new(), OkAtom, 1)), @@ -164,7 +162,7 @@ field_test() -> gleam@any:from( gleam@map:put( gleam@map:put(gleam@map:new(), OkAtom, 3), - EarlierAtom, + ErrorAtom, 1 ) ), |