Current section
Files
Jump to
Current section
Files
src/blah@utils.erl
-module(blah@utils).
-compile([no_auto_import, nowarn_unused_vars]).
-export([get_random_item/1]).
-spec get_random_item(list(FQL)) -> FQL.
get_random_item(Given_list) ->
Max_index = gleam@list:length(Given_list),
Index = gleam@int:random(0, Max_index),
_assert_subject = gleam@list:at(Given_list, Index),
{ok, Item} = case _assert_subject of
{ok, _} -> _assert_subject;
_assert_fail ->
erlang:error(#{gleam_error => assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _assert_fail,
module => <<"blah/utils"/utf8>>,
function => <<"get_random_item"/utf8>>,
line => 7})
end,
Item.