Current section

Files

Jump to
gleam_erlang gen test gleam@erlang@charlist_test.erl
Raw

gen/test/gleam@erlang@charlist_test.erl

-module(gleam@erlang@charlist_test).
-compile(no_auto_import).
-export([to_string_test/0, empty_string_test/0]).
-spec to_string_test() -> binary().
to_string_test() ->
<<"Hello, from erlang!"/utf8>> = case begin
_pipe = <<"Hello, from erlang!"/utf8>>,
_pipe@1 = gleam@erlang@charlist:from_string(_pipe),
gleam@erlang@charlist:to_string(_pipe@1)
end of
<<"Hello, from erlang!"/utf8>> -> <<"Hello, from erlang!"/utf8>>;
_try ->
erlang:error(#{gleam_error => assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _try,
module => <<"gleam/erlang/charlist_test"/utf8>>,
function => <<"to_string_test"/utf8>>,
line => 5})
end.
-spec empty_string_test() -> list(any()).
empty_string_test() ->
<<""/utf8>> = case begin
_pipe = [],
_pipe@1 = gleam@dynamic:from(_pipe),
_pipe@2 = gleam@dynamic:unsafe_coerce(_pipe@1),
gleam@erlang@charlist:to_string(_pipe@2)
end of
<<""/utf8>> -> <<""/utf8>>;
_try ->
erlang:error(#{gleam_error => assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _try,
module => <<"gleam/erlang/charlist_test"/utf8>>,
function => <<"empty_string_test"/utf8>>,
line => 12})
end,
[] = case begin
_pipe@3 = <<""/utf8>>,
_pipe@4 = gleam@erlang@charlist:from_string(_pipe@3),
_pipe@5 = gleam@dynamic:from(_pipe@4),
gleam@dynamic:unsafe_coerce(_pipe@5)
end of
[] -> [];
_try@1 ->
erlang:error(#{gleam_error => assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _try@1,
module => <<"gleam/erlang/charlist_test"/utf8>>,
function => <<"empty_string_test"/utf8>>,
line => 18})
end.