diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/gleam/bit_builder.gleam | 2 | ||||
| -rw-r--r-- | src/gleam_stdlib.erl | 5 |
2 files changed, 5 insertions, 2 deletions
diff --git a/src/gleam/bit_builder.gleam b/src/gleam/bit_builder.gleam index c3c88b0..dc066ae 100644 --- a/src/gleam/bit_builder.gleam +++ b/src/gleam/bit_builder.gleam @@ -74,7 +74,7 @@ pub external fn concat(List(BitBuilder)) -> BitBuilder = /// Runs in constant time. /// pub external fn from_bit_string(BitString) -> BitBuilder = - "gleam_stdlib" "identity" + "gleam_stdlib" "wrap_list" /// Turns an builder into a bit string. /// diff --git a/src/gleam_stdlib.erl b/src/gleam_stdlib.erl index f84e658..fa5f8fd 100644 --- a/src/gleam_stdlib.erl +++ b/src/gleam_stdlib.erl @@ -11,7 +11,7 @@ string_pad/4, decode_tuple2/1, decode_map/1, bit_string_int_to_u32/1, bit_string_int_from_u32/1, bit_string_append/2, bit_string_part_/3, decode_bit_string/1, compile_regex/2, regex_match/2, regex_split/2, - regex_scan/2, base_decoded4/1]). + regex_scan/2, base_decoded4/1, wrap_list/1]). should_equal(Actual, Expected) -> ?assertEqual(Expected, Actual). should_not_equal(Actual, Expected) -> ?assertNotEqual(Expected, Actual). @@ -205,3 +205,6 @@ base_decoded4(S) -> try {ok, base64:decode(S)} catch error:badarith -> {error, nil} end. + +wrap_list(X) when is_list(X) -> X; +wrap_list(X) -> [X]. |