Current section
Files
Jump to
Current section
Files
src/blah@utils.erl
-module(blah@utils).
-compile(no_auto_import).
-export([get_random_item/1, join/2]).
-spec get_random_item(list(EKZ)) -> EKZ.
get_random_item(Given_list) ->
Max_index = gleam@list:length(Given_list),
Index = gleam@int:random(0, Max_index),
{ok, Item@1} = case gleam@list:at(Given_list, Index) of
{ok, Item} -> {ok, Item};
_try ->
erlang:error(#{gleam_error => assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _try,
module => <<"blah/utils"/utf8>>,
function => <<"get_random_item"/utf8>>,
line => 8})
end,
Item@1.
-spec join(list(binary()), binary()) -> binary().
join(Parts, Separator) ->
case gleam@list:rest(Parts) of
{ok, Rest} ->
{ok, First@1} = case gleam@list:first(Parts) of
{ok, First} -> {ok, First};
_try ->
erlang:error(#{gleam_error => assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _try,
module => <<"blah/utils"/utf8>>,
function => <<"join"/utf8>>,
line => 15})
end,
_pipe@2 = gleam@list:fold(
Rest,
gleam@string_builder:from_string(First@1),
fun(State, Current) ->
_pipe = State,
_pipe@1 = gleam@string_builder:append(_pipe, Separator),
gleam@string_builder:append(_pipe@1, Current)
end
),
gleam@string_builder:to_string(_pipe@2);
{error, nil} ->
<<""/utf8>>
end.