diff options
| author | Louis Pilfold <louis@lpil.uk> | 2019-05-29 21:02:55 +0100 |
|---|---|---|
| committer | Louis Pilfold <louis@lpil.uk> | 2019-06-02 21:12:59 +0100 |
| commit | 5a1f3494eb9517a7b7a332cb74dd10a6a7d32d31 (patch) | |
| tree | 5d0d281c66cf71c6e3ca880e6621138a71b95e7b /gen/test/std@int_test.erl | |
| parent | ee03f5a0465e176e220060164a5ffc408f73ed0d (diff) | |
| download | gleam_stdlib-5a1f3494eb9517a7b7a332cb74dd10a6a7d32d31.tar.gz gleam_stdlib-5a1f3494eb9517a7b7a332cb74dd10a6a7d32d31.zip | |
Enable namespaced modules
Diffstat (limited to 'gen/test/std@int_test.erl')
| -rw-r--r-- | gen/test/std@int_test.erl | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/gen/test/std@int_test.erl b/gen/test/std@int_test.erl new file mode 100644 index 0000000..9aa68f3 --- /dev/null +++ b/gen/test/std@int_test.erl @@ -0,0 +1,29 @@ +-module(std@int_test). +-compile(no_auto_import). + +-export([to_string/0, parse/0, to_base_string/0, compare_test/0]). + +to_string() -> + std@expect:equal(std@int:to_string(123), <<"123">>), + std@expect:equal(std@int:to_string(-123), <<"-123">>), + std@expect:equal(std@int:to_string(123), <<"123">>). + +parse() -> + std@expect:equal(std@int:parse(<<"123">>), {ok, 123}), + std@expect:equal(std@int:parse(<<"-123">>), {ok, -123}), + std@expect:equal(std@int:parse(<<"0123">>), {ok, 123}), + std@expect:is_error(std@int:parse(<<"">>)), + std@expect:is_error(std@int:parse(<<"what">>)), + std@expect:is_error(std@int:parse(<<"1.23">>)). + +to_base_string() -> + std@expect:equal(std@int:to_base_string(100, 16), <<"64">>), + std@expect:equal(std@int:to_base_string(-100, 16), <<"-64">>). + +compare_test() -> + std@expect:equal(std@int:compare(0, 0), eq), + std@expect:equal(std@int:compare(1, 1), eq), + std@expect:equal(std@int:compare(0, 1), lt), + std@expect:equal(std@int:compare(-2, -1), lt), + std@expect:equal(std@int:compare(2, 1), gt), + std@expect:equal(std@int:compare(-1, -2), gt). |