Current section

Files

Jump to
blah src blah@utils.erl
Raw

src/blah@utils.erl

-module(blah@utils).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([get_random_int/2, get_random_item/1]).
-spec get_random_int(integer(), integer()) -> integer().
get_random_int(Min, Max) ->
gleam@int:random(Max - Min) + Min.
-spec get_random_item(list(GWN)) -> GWN.
get_random_item(Given_list) ->
Max_index = gleam@list:length(Given_list),
Index = gleam@int:random(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 => let_assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _assert_fail,
module => <<"blah/utils"/utf8>>,
function => <<"get_random_item"/utf8>>,
line => 11})
end,
Item.