diff options
| author | Louis Pilfold <louis@lpil.uk> | 2019-06-25 22:48:07 +0100 |
|---|---|---|
| committer | Louis Pilfold <louis@lpil.uk> | 2019-06-25 22:48:07 +0100 |
| commit | 2c2541750ca4b7b604070c75c18d84be833c97d5 (patch) | |
| tree | f5e63d941a1c7e2c2d4dff1d81c43fa2766308ae /gen/test/gleam@iodata_test.erl | |
| parent | 96c20b8ebf8420fbba75c97fa08eaeb34e8dc394 (diff) | |
| download | gleam_stdlib-2c2541750ca4b7b604070c75c18d84be833c97d5.tar.gz gleam_stdlib-2c2541750ca4b7b604070c75c18d84be833c97d5.zip | |
stdlib namespace std -> gleam
Diffstat (limited to 'gen/test/gleam@iodata_test.erl')
| -rw-r--r-- | gen/test/gleam@iodata_test.erl | 58 |
1 files changed, 58 insertions, 0 deletions
diff --git a/gen/test/gleam@iodata_test.erl b/gen/test/gleam@iodata_test.erl new file mode 100644 index 0000000..621266c --- /dev/null +++ b/gen/test/gleam@iodata_test.erl @@ -0,0 +1,58 @@ +-module(gleam@iodata_test). +-compile(no_auto_import). + +-export([iodata_test/0, lowercase_test/0, uppercase_test/0, split_test/0, is_equal_test/0, is_empty_test/0]). + +iodata_test() -> + Data = gleam@iodata:prepend(gleam@iodata:append(gleam@iodata:append(gleam@iodata:new(<<"ello">>), + <<",">>), + <<" world!">>), + <<"H">>), + gleam@expect:equal(gleam@iodata:to_string(Data), <<"Hello, world!">>), + gleam@expect:equal(gleam@iodata:byte_size(Data), 13), + Data1 = gleam@iodata:prepend_iodata(gleam@iodata:append_iodata(gleam@iodata:append_iodata(gleam@iodata:new(<<"ello">>), + gleam@iodata:new(<<",">>)), + gleam@iodata:concat([gleam@iodata:new(<<" wo">>), + gleam@iodata:new(<<"rld!">>)])), + gleam@iodata:new(<<"H">>)), + gleam@expect:equal(gleam@iodata:to_string(Data1), <<"Hello, world!">>), + gleam@expect:equal(gleam@iodata:byte_size(Data1), 13). + +lowercase_test() -> + gleam@expect:equal(gleam@iodata:to_string(gleam@iodata:lowercase(gleam@iodata:from_strings([<<"Gleam">>, + <<"Gleam">>]))), + <<"gleamgleam">>). + +uppercase_test() -> + gleam@expect:equal(gleam@iodata:to_string(gleam@iodata:uppercase(gleam@iodata:from_strings([<<"Gleam">>, + <<"Gleam">>]))), + <<"GLEAMGLEAM">>). + +split_test() -> + gleam@expect:equal(gleam@iodata:split(gleam@iodata:new(<<"Gleam,Erlang,Elixir">>), + <<",">>), + [gleam@iodata:new(<<"Gleam">>), + gleam@iodata:new(<<"Erlang">>), + gleam@iodata:new(<<"Elixir">>)]), + gleam@expect:equal(gleam@iodata:split(gleam@iodata:from_strings([<<"Gleam, Erl">>, + <<"ang,Elixir">>]), + <<", ">>), + [gleam@iodata:new(<<"Gleam">>), + gleam@iodata:from_strings([<<"Erl">>, + <<"ang,Elixir">>])]). + +is_equal_test() -> + gleam@expect:true(gleam@iodata:is_equal(gleam@iodata:new(<<"12">>), + gleam@iodata:from_strings([<<"1">>, + <<"2">>]))), + gleam@expect:true(gleam@iodata:is_equal(gleam@iodata:new(<<"12">>), + gleam@iodata:new(<<"12">>))), + gleam@expect:false(gleam@iodata:is_equal(gleam@iodata:new(<<"12">>), + gleam@iodata:new(<<"2">>))). + +is_empty_test() -> + gleam@expect:true(gleam@iodata:is_empty(gleam@iodata:new(<<"">>))), + gleam@expect:false(gleam@iodata:is_empty(gleam@iodata:new(<<"12">>))), + gleam@expect:true(gleam@iodata:is_empty(gleam@iodata:from_strings([]))), + gleam@expect:true(gleam@iodata:is_empty(gleam@iodata:from_strings([<<"">>, + <<"">>]))). |