Current section

Files

Jump to
pears src pears@input.erl
Raw

src/pears@input.erl

-module(pears@input).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([get/1, at_end/1]).
-spec get(list(FJU)) -> gleam@option:option({FJU, list(FJU)}).
get(Input) ->
case Input of
[] ->
none;
[Head | Tail] ->
{some, {Head, Tail}}
end.
-spec at_end(list(any())) -> boolean().
at_end(Input) ->
case Input of
[] ->
true;
_ ->
false
end.