Current section

Files

Jump to
gleam_stdlib gen test gleam@pair_test.erl
Raw

gen/test/gleam@pair_test.erl

-module(gleam@pair_test).
-compile(no_auto_import).
-export([first_test/0, second_test/0, swap_test/0]).
first_test() ->
gleam@expect:equal(gleam@pair:first({1, 2}), 1),
gleam@expect:equal(gleam@pair:first({<<"abc">>, []}), <<"abc">>).
second_test() ->
gleam@expect:equal(gleam@pair:second({1, 2}), 2),
gleam@expect:equal(gleam@pair:second({<<"abc">>, []}), []).
swap_test() ->
gleam@expect:equal(gleam@pair:swap({1, <<"2">>}), {<<"2">>, 1}).