aboutsummaryrefslogtreecommitdiff
path: root/gen/test/iodata_test.erl
diff options
context:
space:
mode:
Diffstat (limited to 'gen/test/iodata_test.erl')
-rw-r--r--gen/test/iodata_test.erl52
1 files changed, 0 insertions, 52 deletions
diff --git a/gen/test/iodata_test.erl b/gen/test/iodata_test.erl
deleted file mode 100644
index b996bec..0000000
--- a/gen/test/iodata_test.erl
+++ /dev/null
@@ -1,52 +0,0 @@
--module(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 = iodata:prepend(iodata:append(iodata:append(iodata:new(<<"ello">>),
- <<",">>),
- <<" world!">>),
- <<"H">>),
- expect:equal(iodata:to_string(Data), <<"Hello, world!">>),
- expect:equal(iodata:byte_size(Data), 13),
- Data1 = iodata:prepend_iodata(iodata:append_iodata(iodata:append_iodata(iodata:new(<<"ello">>),
- iodata:new(<<",">>)),
- iodata:concat([iodata:new(<<" wo">>),
- iodata:new(<<"rld!">>)])),
- iodata:new(<<"H">>)),
- expect:equal(iodata:to_string(Data1), <<"Hello, world!">>),
- expect:equal(iodata:byte_size(Data1), 13).
-
-lowercase_test() ->
- expect:equal(iodata:to_string(iodata:lowercase(iodata:from_strings([<<"Gleam">>,
- <<"Gleam">>]))),
- <<"gleamgleam">>).
-
-uppercase_test() ->
- expect:equal(iodata:to_string(iodata:uppercase(iodata:from_strings([<<"Gleam">>,
- <<"Gleam">>]))),
- <<"GLEAMGLEAM">>).
-
-split_test() ->
- expect:equal(iodata:split(iodata:new(<<"Gleam,Erlang,Elixir">>), <<",">>),
- [iodata:new(<<"Gleam">>),
- iodata:new(<<"Erlang">>),
- iodata:new(<<"Elixir">>)]),
- expect:equal(iodata:split(iodata:from_strings([<<"Gleam, Erl">>,
- <<"ang,Elixir">>]),
- <<", ">>),
- [iodata:new(<<"Gleam">>),
- iodata:from_strings([<<"Erl">>, <<"ang,Elixir">>])]).
-
-is_equal_test() ->
- expect:true(iodata:is_equal(iodata:new(<<"12">>),
- iodata:from_strings([<<"1">>, <<"2">>]))),
- expect:true(iodata:is_equal(iodata:new(<<"12">>), iodata:new(<<"12">>))),
- expect:false(iodata:is_equal(iodata:new(<<"12">>), iodata:new(<<"2">>))).
-
-is_empty_test() ->
- expect:true(iodata:is_empty(iodata:new(<<"">>))),
- expect:false(iodata:is_empty(iodata:new(<<"12">>))),
- expect:true(iodata:is_empty(iodata:from_strings([]))),
- expect:true(iodata:is_empty(iodata:from_strings([<<"">>, <<"">>]))).