From 5a1f3494eb9517a7b7a332cb74dd10a6a7d32d31 Mon Sep 17 00:00:00 2001 From: Louis Pilfold Date: Wed, 29 May 2019 21:02:55 +0100 Subject: Enable namespaced modules --- gen/test/std@string_test.erl | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 gen/test/std@string_test.erl (limited to 'gen/test/std@string_test.erl') diff --git a/gen/test/std@string_test.erl b/gen/test/std@string_test.erl new file mode 100644 index 0000000..b0cc46e --- /dev/null +++ b/gen/test/std@string_test.erl @@ -0,0 +1,33 @@ +-module(std@string_test). +-compile(no_auto_import). + +-export([length_test/0, lowercase_test/0, uppercase_test/0, reverse_test/0, split_test/0, replace_test/0, append_test/0]). + +length_test() -> + std@expect:equal(std@string:length(<<"ß↑e̊">>), 3), + std@expect:equal(std@string:length(<<"Gleam">>), 5), + std@expect:equal(std@string:length(<<"">>), 0). + +lowercase_test() -> + std@expect:equal(std@string:lowercase(<<"Gleam">>), <<"gleam">>). + +uppercase_test() -> + std@expect:equal(std@string:uppercase(<<"Gleam">>), <<"GLEAM">>). + +reverse_test() -> + std@expect:equal(std@string:reverse(<<"Gleam">>), <<"maelG">>). + +split_test() -> + std@expect:equal(std@string:split(<<"Gleam,Erlang,Elixir">>, <<",">>), + [<<"Gleam">>, <<"Erlang">>, <<"Elixir">>]), + std@expect:equal(std@string:split(<<"Gleam, Erlang,Elixir">>, <<", ">>), + [<<"Gleam">>, <<"Erlang,Elixir">>]). + +replace_test() -> + std@expect:equal(std@string:replace(<<"Gleam,Erlang,Elixir">>, + <<",">>, + <<"++">>), + <<"Gleam++Erlang++Elixir">>). + +append_test() -> + std@expect:equal(std@string:append(<<"Test">>, <<" Me">>), <<"Test Me">>). -- cgit v1.2.3