Current section
Files
Jump to
Current section
Files
src/evil.erl
-module(evil).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([at/2, expect/2]).
-file("/Users/cdaringe/src/gserde/src/evil.gleam", 4).
-spec at(list(JYQ), integer()) -> {ok, JYQ} | {error, nil}.
at(L, Index) ->
_pipe = gleam@list:index_map(L, fun(X, I) -> {X, I} end),
gleam@list:find_map(_pipe, fun(X@1) -> case erlang:element(2, X@1) of
V when V =:= Index ->
{ok, erlang:element(1, X@1)};
_ ->
{error, nil}
end end).
-file("/Users/cdaringe/src/gserde/src/evil.gleam", 14).
-spec expect({ok, JZN} | {error, any()}, binary()) -> JZN.
expect(X, Msg) ->
case X of
{ok, V} ->
V;
{error, _} ->
gleam_stdlib:print_error(Msg),
erlang:error(#{gleam_error => panic,
message => <<"`panic` expression evaluated."/utf8>>,
module => <<"evil"/utf8>>,
function => <<"expect"/utf8>>,
line => 19})
end.