diff options
| author | Robert Peterson <robert.peterson@gmail.com> | 2019-04-18 07:38:28 -0700 |
|---|---|---|
| committer | Louis Pilfold <louis@lpil.uk> | 2019-04-18 16:16:05 +0100 |
| commit | f2b09ca44f9448cf351093abdf50f9bb6e411423 (patch) | |
| tree | 40ab49c7586516f796f0ccc359ca035da7b0af3c /gen | |
| parent | aecd1d23fc3fa3bb5bf5749770ef8b9b7a9ee068 (diff) | |
| download | gleam_stdlib-f2b09ca44f9448cf351093abdf50f9bb6e411423.tar.gz gleam_stdlib-f2b09ca44f9448cf351093abdf50f9bb6e411423.zip | |
Add str:append
Diffstat (limited to 'gen')
| -rw-r--r-- | gen/src/str.erl | 5 | ||||
| -rw-r--r-- | gen/test/str_test.erl | 5 |
2 files changed, 8 insertions, 2 deletions
diff --git a/gen/src/str.erl b/gen/src/str.erl index b492c86..4a35a35 100644 --- a/gen/src/str.erl +++ b/gen/src/str.erl @@ -1,7 +1,7 @@ -module(str). -compile(no_auto_import). --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]). +-export([length/1, lowercase/1, uppercase/1, reverse/1, split/2, replace/3, append/2, from_int/1, parse_int/1, parse_float/1, base_from_int/2, from_float/1]). length(A) -> string:length(A). @@ -21,6 +21,9 @@ split(String, On) -> replace(String, Pattern, With) -> iodata:to_string(iodata:replace(iodata:new(String), Pattern, With)). +append(S1, S2) -> + iodata:to_string(iodata:append(iodata:new(S1), S2)). + from_int(A) -> erlang:integer_to_binary(A). diff --git a/gen/test/str_test.erl b/gen/test/str_test.erl index 0048ce8..b3a89b2 100644 --- a/gen/test/str_test.erl +++ b/gen/test/str_test.erl @@ -1,7 +1,7 @@ -module(str_test). -compile(no_auto_import). --export([length_test/0, lowercase_test/0, uppercase_test/0, reverse_test/0, split_test/0, replace_test/0, from_int_test/0, parse_int_test/0, parse_float_test/0, base_from_int_test/0, from_float_test/0]). +-export([length_test/0, lowercase_test/0, uppercase_test/0, reverse_test/0, split_test/0, replace_test/0, append_test/0, from_int_test/0, parse_int_test/0, parse_float_test/0, base_from_int_test/0, from_float_test/0]). length_test() -> expect:equal(str:length(<<"ß↑e̊">>), 3), @@ -27,6 +27,9 @@ replace_test() -> expect:equal(str:replace(<<"Gleam,Erlang,Elixir">>, <<",">>, <<"++">>), <<"Gleam++Erlang++Elixir">>). +append_test() -> + expect:equal(str:append(<<"Test">>, <<" Me">>), <<"Test Me">>). + from_int_test() -> expect:equal(str:from_int(123), <<"123">>), expect:equal(str:from_int(-123), <<"-123">>), |