diff options
| author | Luis Rascão <[email protected]> | 2017-11-11 02:01:51 +0000 |
|---|---|---|
| committer | GitHub <[email protected]> | 2017-11-11 02:01:51 +0000 |
| commit | 1d051663982502620dbdd2b372aee52894981568 (patch) | |
| tree | 5859cfa77aeca68f30c03ceec8ee31cd2d3e943c /src/rlx_string.erl | |
| parent | fb91587091ad8a9da7c22598e962d0f21dcc17ee (diff) | |
| parent | 2868d7a7ae79829c740ff9a49e22e2ccf9e6296c (diff) | |
| download | relx-1d051663982502620dbdd2b372aee52894981568.tar.gz relx-1d051663982502620dbdd2b372aee52894981568.tar.bz2 relx-1d051663982502620dbdd2b372aee52894981568.zip | |
Merge pull request #618 from ferd/otp-20-unicode-support
OTP-20 unicode support and OTP-21 readiness
Diffstat (limited to 'src/rlx_string.erl')
| -rw-r--r-- | src/rlx_string.erl | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/src/rlx_string.erl b/src/rlx_string.erl new file mode 100644 index 0000000..1f9cc0c --- /dev/null +++ b/src/rlx_string.erl @@ -0,0 +1,23 @@ +%% Compatibility module for the string API changes between +%% OTP-19 and OTP-21, where Unicode support means the deprecation +%% of a lot of string functions. +-module(rlx_string). +-export([concat/2, lexemes/2, join/2]). + +-ifdef(unicode_str). +concat(Str1, Str2) -> unicode:characters_to_list([Str1,Str2]). +lexemes(Str, Separators) -> string:lexemes(Str, Separators). +-else. +concat(Str1, Str2) -> string:concat(Str1, Str2). +lexemes(Str, Separators) -> string:tokens(Str, Separators). +-endif. + +%% string:join/2 copy; string:join/2 is getting obsoleted +%% and replaced by lists:join/2, but lists:join/2 is too new +%% for version support (only appeared in 19.0) so it cannot be +%% used. Instead we just adopt join/2 locally and hope it works +%% for most unicode use cases anyway. +join([], Sep) when is_list(Sep) -> + []; +join([H|T], Sep) -> + H ++ lists:append([Sep ++ X || X <- T]). |