From 2c2541750ca4b7b604070c75c18d84be833c97d5 Mon Sep 17 00:00:00 2001 From: Louis Pilfold Date: Tue, 25 Jun 2019 22:48:07 +0100 Subject: stdlib namespace std -> gleam --- gen/test/gleam@string_test.erl | 34 ++++++++++++++++++++++++++++++++++ 1 file changed, 34 insertions(+) create mode 100644 gen/test/gleam@string_test.erl (limited to 'gen/test/gleam@string_test.erl') diff --git a/gen/test/gleam@string_test.erl b/gen/test/gleam@string_test.erl new file mode 100644 index 0000000..5d1d912 --- /dev/null +++ b/gen/test/gleam@string_test.erl @@ -0,0 +1,34 @@ +-module(gleam@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() -> + gleam@expect:equal(gleam@string:length(<<"ß↑e̊">>), 3), + gleam@expect:equal(gleam@string:length(<<"Gleam">>), 5), + gleam@expect:equal(gleam@string:length(<<"">>), 0). + +lowercase_test() -> + gleam@expect:equal(gleam@string:lowercase(<<"Gleam">>), <<"gleam">>). + +uppercase_test() -> + gleam@expect:equal(gleam@string:uppercase(<<"Gleam">>), <<"GLEAM">>). + +reverse_test() -> + gleam@expect:equal(gleam@string:reverse(<<"Gleam">>), <<"maelG">>). + +split_test() -> + gleam@expect:equal(gleam@string:split(<<"Gleam,Erlang,Elixir">>, <<",">>), + [<<"Gleam">>, <<"Erlang">>, <<"Elixir">>]), + gleam@expect:equal(gleam@string:split(<<"Gleam, Erlang,Elixir">>, <<", ">>), + [<<"Gleam">>, <<"Erlang,Elixir">>]). + +replace_test() -> + gleam@expect:equal(gleam@string:replace(<<"Gleam,Erlang,Elixir">>, + <<",">>, + <<"++">>), + <<"Gleam++Erlang++Elixir">>). + +append_test() -> + gleam@expect:equal(gleam@string:append(<<"Test">>, <<" Me">>), + <<"Test Me">>). -- cgit v1.2.3