aboutsummaryrefslogtreecommitdiff
path: root/gen/str.erl
diff options
context:
space:
mode:
Diffstat (limited to 'gen/str.erl')
-rw-r--r--gen/str.erl113
1 files changed, 0 insertions, 113 deletions
diff --git a/gen/str.erl b/gen/str.erl
deleted file mode 100644
index b403187..0000000
--- a/gen/str.erl
+++ /dev/null
@@ -1,113 +0,0 @@
--module(str).
--compile(no_auto_import).
--include_lib("eunit/include/eunit.hrl").
-
--export([length/1, lowercase/1, uppercase/1, reverse/1, split/2, replace/3, from_int/1, parse_int/1, parse_float/1, base_from_int/2, from_float/1]).
-
-length(A) ->
- string:length(A).
-
--ifdef(TEST).
-length_test() ->
- expect:equal(length(<<"ß↑e̊">>), 3),
- expect:equal(length(<<"Gleam">>), 5),
- expect:equal(length(<<"">>), 0).
--endif.
-
-lowercase(A) ->
- string:lowercase(A).
-
--ifdef(TEST).
-lowercase_test() ->
- expect:equal(lowercase(<<"Gleam">>), <<"gleam">>).
--endif.
-
-uppercase(A) ->
- string:uppercase(A).
-
--ifdef(TEST).
-uppercase_test() ->
- expect:equal(uppercase(<<"Gleam">>), <<"GLEAM">>).
--endif.
-
-reverse(String) ->
- iodata:to_string(iodata:reverse(iodata:new(String))).
-
--ifdef(TEST).
-reverse_test() ->
- expect:equal(reverse(<<"Gleam">>), <<"maelG">>).
--endif.
-
-split(String, On) ->
- list:map(iodata:split(iodata:new(String), On), fun iodata:to_string/1).
-
--ifdef(TEST).
-split_test() ->
- expect:equal(split(<<"Gleam,Erlang,Elixir">>, <<",">>),
- [<<"Gleam">>, <<"Erlang">>, <<"Elixir">>]),
- expect:equal(split(<<"Gleam, Erlang,Elixir">>, <<", ">>),
- [<<"Gleam">>, <<"Erlang,Elixir">>]).
--endif.
-
-replace(String, Pattern, With) ->
- iodata:to_string(iodata:replace(iodata:new(String), Pattern, With)).
-
--ifdef(TEST).
-replace_test() ->
- expect:equal(replace(<<"Gleam,Erlang,Elixir">>, <<",">>, <<"++">>),
- <<"Gleam++Erlang++Elixir">>).
--endif.
-
-from_int(A) ->
- erlang:integer_to_binary(A).
-
--ifdef(TEST).
-from_int_test() ->
- expect:equal(from_int(123), <<"123">>),
- expect:equal(from_int(-123), <<"-123">>),
- expect:equal(from_int(123), <<"123">>).
--endif.
-
-parse_int(A) ->
- gleam__stdlib:parse_int(A).
-
--ifdef(TEST).
-parse_int_test() ->
- expect:equal(parse_int(<<"123">>), {ok, 123}),
- expect:equal(parse_int(<<"-123">>), {ok, -123}),
- expect:equal(parse_int(<<"0123">>), {ok, 123}),
- expect:equal(parse_int(<<"">>), {error, parse_error}),
- expect:equal(parse_int(<<"what">>), {error, parse_error}),
- expect:equal(parse_int(<<"1.23">>), {error, parse_error}).
--endif.
-
-parse_float(A) ->
- gleam__stdlib:parse_float(A).
-
--ifdef(TEST).
-parse_float_test() ->
- expect:equal(parse_float(<<"1.23">>), {ok, 1.23}),
- expect:equal(parse_float(<<"5.0">>), {ok, 5.0}),
- expect:equal(parse_float(<<"0.123456789">>), {ok, 0.123456789}),
- expect:equal(parse_float(<<"">>), {error, parse_error}),
- expect:equal(parse_float(<<"what">>), {error, parse_error}),
- expect:equal(parse_float(<<"1">>), {error, parse_error}).
--endif.
-
-base_from_int(A, B) ->
- erlang:integer_to_binary(A, B).
-
--ifdef(TEST).
-base_from_int_test() ->
- expect:equal(base_from_int(100, 16), <<"64">>),
- expect:equal(base_from_int(-100, 16), <<"-64">>).
--endif.
-
-from_float(F) ->
- iodata:to_string(iodata:from_float(F)).
-
--ifdef(TEST).
-from_float_test() ->
- expect:equal(from_float(123.0), <<"123.0">>),
- expect:equal(from_float(-8.1), <<"-8.1">>).
--endif.