aboutsummaryrefslogtreecommitdiff
path: root/gen/str.erl
diff options
context:
space:
mode:
authorLouis Pilfold <louis@lpil.uk>2019-04-14 13:03:24 +0000
committerLouis Pilfold <louis@lpil.uk>2019-04-14 13:03:32 +0000
commit8cfa606f3834cf7d05f5011bc68295a9d84263dc (patch)
treefa7edc8ea53426b072f35d3d61e0ab821c8d5feb /gen/str.erl
parentae5597c1b27982aabe74eb16d5b0c890802730d9 (diff)
downloadgleam_stdlib-8cfa606f3834cf7d05f5011bc68295a9d84263dc.tar.gz
gleam_stdlib-8cfa606f3834cf7d05f5011bc68295a9d84263dc.zip
stdlib: Split out tests
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.