From b01cf7a707338abb57e4ccf1383a4c11b195af4c Mon Sep 17 00:00:00 2001 From: Joshua Reusch Date: Mon, 12 Aug 2024 01:12:19 +0200 Subject: improve pop_grapheme performance --- src/gleam_stdlib.erl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'src/gleam_stdlib.erl') diff --git a/src/gleam_stdlib.erl b/src/gleam_stdlib.erl index 97b8831..0b4aae5 100644 --- a/src/gleam_stdlib.erl +++ b/src/gleam_stdlib.erl @@ -194,8 +194,12 @@ string_pad(String, Length, Dir, PadString) -> string_pop_grapheme(String) -> case string:next_grapheme(String) of - [ Next | Rest ] -> + [ Next | Rest ] when is_binary(Rest) -> + {ok, {unicode:characters_to_binary([Next]), Rest}}; + + [ Next | Rest ] -> {ok, {unicode:characters_to_binary([Next]), unicode:characters_to_binary(Rest)}}; + _ -> {error, nil} end. -- cgit v1.2.3