Current section

Files

Jump to
gleam_stdlib gen test gleam@string_builder_test.erl
Raw

gen/test/gleam@string_builder_test.erl

-module(gleam@string_builder_test).
-compile(no_auto_import).
-export([string_builder_test/0, lowercase_test/0, uppercase_test/0, split_test/0, is_equal_test/0, is_empty_test/0]).
-spec string_builder_test() -> nil.
string_builder_test() ->
Data = begin
_pipe = gleam@string_builder:from_string(<<"ello"/utf8>>),
_pipe@1 = gleam@string_builder:append(_pipe, <<","/utf8>>),
_pipe@2 = gleam@string_builder:append(_pipe@1, <<" world!"/utf8>>),
gleam@string_builder:prepend(_pipe@2, <<"H"/utf8>>)
end,
_pipe@3 = Data,
_pipe@4 = gleam@string_builder:to_string(_pipe@3),
gleam@should:equal(_pipe@4, <<"Hello, world!"/utf8>>),
_pipe@5 = Data,
_pipe@6 = gleam@string_builder:byte_size(_pipe@5),
gleam@should:equal(_pipe@6, 13),
Data@1 = begin
_pipe@7 = gleam@string_builder:from_string(<<"ello"/utf8>>),
_pipe@8 = gleam@string_builder:append_builder(
_pipe@7,
gleam@string_builder:from_string(<<","/utf8>>)
),
_pipe@9 = gleam@string_builder:append_builder(
_pipe@8,
gleam@string_builder:concat(
[gleam@string_builder:from_string(<<" wo"/utf8>>),
gleam@string_builder:from_string(<<"rld!"/utf8>>)]
)
),
gleam@string_builder:prepend_builder(
_pipe@9,
gleam@string_builder:from_string(<<"H"/utf8>>)
)
end,
_pipe@10 = Data@1,
_pipe@11 = gleam@string_builder:to_string(_pipe@10),
gleam@should:equal(_pipe@11, <<"Hello, world!"/utf8>>),
_pipe@12 = Data@1,
_pipe@13 = gleam@string_builder:byte_size(_pipe@12),
gleam@should:equal(_pipe@13, 13).
-spec lowercase_test() -> nil.
lowercase_test() ->
_pipe = [<<"Gleam"/utf8>>, <<"Gleam"/utf8>>],
_pipe@1 = gleam@string_builder:from_strings(_pipe),
_pipe@2 = gleam@string_builder:lowercase(_pipe@1),
_pipe@3 = gleam@string_builder:to_string(_pipe@2),
gleam@should:equal(_pipe@3, <<"gleamgleam"/utf8>>).
-spec uppercase_test() -> nil.
uppercase_test() ->
_pipe = [<<"Gleam"/utf8>>, <<"Gleam"/utf8>>],
_pipe@1 = gleam@string_builder:from_strings(_pipe),
_pipe@2 = gleam@string_builder:uppercase(_pipe@1),
_pipe@3 = gleam@string_builder:to_string(_pipe@2),
gleam@should:equal(_pipe@3, <<"GLEAMGLEAM"/utf8>>).
-spec split_test() -> nil.
split_test() ->
_pipe = <<"Gleam,Erlang,Elixir"/utf8>>,
_pipe@1 = gleam@string_builder:from_string(_pipe),
_pipe@2 = gleam@string_builder:split(_pipe@1, <<","/utf8>>),
gleam@should:equal(
_pipe@2,
[gleam@string_builder:from_string(<<"Gleam"/utf8>>),
gleam@string_builder:from_string(<<"Erlang"/utf8>>),
gleam@string_builder:from_string(<<"Elixir"/utf8>>)]
),
_pipe@3 = [<<"Gleam, Erl"/utf8>>, <<"ang,Elixir"/utf8>>],
_pipe@4 = gleam@string_builder:from_strings(_pipe@3),
_pipe@5 = gleam@string_builder:split(_pipe@4, <<", "/utf8>>),
gleam@should:equal(
_pipe@5,
[gleam@string_builder:from_string(<<"Gleam"/utf8>>),
gleam@string_builder:from_strings(
[<<"Erl"/utf8>>, <<"ang,Elixir"/utf8>>]
)]
).
-spec is_equal_test() -> nil.
is_equal_test() ->
_pipe = gleam@string_builder:from_string(<<"12"/utf8>>),
_pipe@1 = gleam@string_builder:is_equal(
_pipe,
gleam@string_builder:from_strings([<<"1"/utf8>>, <<"2"/utf8>>])
),
gleam@should:be_true(_pipe@1),
_pipe@2 = gleam@string_builder:from_string(<<"12"/utf8>>),
_pipe@3 = gleam@string_builder:is_equal(
_pipe@2,
gleam@string_builder:from_string(<<"12"/utf8>>)
),
gleam@should:be_true(_pipe@3),
_pipe@4 = gleam@string_builder:from_string(<<"12"/utf8>>),
_pipe@5 = gleam@string_builder:is_equal(
_pipe@4,
gleam@string_builder:from_string(<<"2"/utf8>>)
),
gleam@should:be_false(_pipe@5).
-spec is_empty_test() -> nil.
is_empty_test() ->
_pipe = gleam@string_builder:from_string(<<""/utf8>>),
_pipe@1 = gleam@string_builder:is_empty(_pipe),
gleam@should:be_true(_pipe@1),
_pipe@2 = gleam@string_builder:from_string(<<"12"/utf8>>),
_pipe@3 = gleam@string_builder:is_empty(_pipe@2),
gleam@should:be_false(_pipe@3),
_pipe@4 = gleam@string_builder:from_strings([]),
_pipe@5 = gleam@string_builder:is_empty(_pipe@4),
gleam@should:be_true(_pipe@5),
_pipe@6 = gleam@string_builder:from_strings([<<""/utf8>>, <<""/utf8>>]),
_pipe@7 = gleam@string_builder:is_empty(_pipe@6),
gleam@should:be_true(_pipe@7).