diff options
author | Peter Saxton <peterhsaxton@gmail.com> | 2020-05-19 17:23:11 +0100 |
---|---|---|
committer | GitHub <noreply@github.com> | 2020-05-19 17:23:11 +0100 |
commit | a805e1fcdc2393aa789ef2dfb15a00669e3e079b (patch) | |
tree | cbad9cee5c94fcbbbf797869ed05d80107349c68 /gen/test/gleam@result_test.erl | |
parent | 88ab320ab452d3151f4f4b391dafd57af07e863c (diff) | |
download | gleam_stdlib-a805e1fcdc2393aa789ef2dfb15a00669e3e079b.tar.gz gleam_stdlib-a805e1fcdc2393aa789ef2dfb15a00669e3e079b.zip |
Add gen to ignored files in git (#47)
Diffstat (limited to 'gen/test/gleam@result_test.erl')
-rw-r--r-- | gen/test/gleam@result_test.erl | 67 |
1 files changed, 0 insertions, 67 deletions
diff --git a/gen/test/gleam@result_test.erl b/gen/test/gleam@result_test.erl deleted file mode 100644 index b40d41d..0000000 --- a/gen/test/gleam@result_test.erl +++ /dev/null @@ -1,67 +0,0 @@ --module(gleam@result_test). --compile(no_auto_import). - --export([is_ok_test/0, is_error_test/0, map_test/0, map_error_test/0, flatten_test/0, then_test/0, unwrap_test/0]). - -is_ok_test() -> - gleam@should:be_true(gleam@result:is_ok({ok, 1})), - gleam@should:be_false(gleam@result:is_ok({error, 1})). - -is_error_test() -> - gleam@should:be_false(gleam@result:is_error({ok, 1})), - gleam@should:be_true(gleam@result:is_error({error, 1})). - -map_test() -> - gleam@should:equal(gleam@result:map({ok, 1}, fun(X) -> X + 1 end), {ok, 2}), - gleam@should:equal( - gleam@result:map({ok, 1}, fun(_) -> <<"2"/utf8>> end), - {ok, <<"2"/utf8>>} - ), - gleam@should:equal( - gleam@result:map({error, 1}, fun(X1) -> X1 + 1 end), - {error, 1} - ). - -map_error_test() -> - gleam@should:equal( - gleam@result:map_error({ok, 1}, fun(X) -> X + 1 end), - {ok, 1} - ), - gleam@should:equal( - gleam@result:map_error( - {error, 1}, - fun(X1) -> {<<"ok"/utf8>>, X1 + 1} end - ), - {error, {<<"ok"/utf8>>, 2}} - ). - -flatten_test() -> - gleam@should:equal(gleam@result:flatten({ok, {ok, 1}}), {ok, 1}), - gleam@should:equal(gleam@result:flatten({ok, {error, 1}}), {error, 1}), - gleam@should:equal(gleam@result:flatten({error, 1}), {error, 1}), - gleam@should:equal( - gleam@result:flatten({error, {error, 1}}), - {error, {error, 1}} - ). - -then_test() -> - gleam@should:equal( - gleam@result:then({error, 1}, fun(X) -> {ok, X + 1} end), - {error, 1} - ), - gleam@should:equal( - gleam@result:then({ok, 1}, fun(X1) -> {ok, X1 + 1} end), - {ok, 2} - ), - gleam@should:equal( - gleam@result:then({ok, 1}, fun(_) -> {ok, <<"type change"/utf8>>} end), - {ok, <<"type change"/utf8>>} - ), - gleam@should:equal( - gleam@result:then({ok, 1}, fun(_) -> {error, 1} end), - {error, 1} - ). - -unwrap_test() -> - gleam@should:equal(gleam@result:unwrap({ok, 1}, 50), 1), - gleam@should:equal(gleam@result:unwrap({error, <<"nope"/utf8>>}, 50), 50). |