Current section

Files

Jump to
gleam_stdlib src gleam@result.erl
Raw

src/gleam@result.erl

-module(gleam@result).
-compile(no_auto_import).
-export([is_ok/1, is_error/1, map/2, map_error/2, flatten/1, then/2, unwrap/2, lazy_unwrap/2, unwrap_error/2, unwrap_both/1, nil_error/1, 'or'/2, lazy_or/2, all/1, replace/2, replace_error/2, values/1]).
-spec is_ok({ok, any()} | {error, any()}) -> boolean().
is_ok(Result) ->
case Result of
{error, _@1} ->
false;
{ok, _@2} ->
true
end.
-spec is_error({ok, any()} | {error, any()}) -> boolean().
is_error(Result) ->
case Result of
{ok, _@1} ->
false;
{error, _@2} ->
true
end.
-spec map({ok, ASE} | {error, ASF}, fun((ASE) -> ASI)) -> {ok, ASI} |
{error, ASF}.
map(Result, Fun) ->
case Result of
{ok, X} ->
{ok, Fun(X)};
{error, E} ->
{error, E}
end.
-spec map_error({ok, ASL} | {error, ASM}, fun((ASM) -> ASP)) -> {ok, ASL} |
{error, ASP}.
map_error(Result, Fun) ->
case Result of
{ok, X} ->
{ok, X};
{error, Error} ->
{error, Fun(Error)}
end.
-spec flatten({ok, {ok, ASS} | {error, AST}} | {error, AST}) -> {ok, ASS} |
{error, AST}.
flatten(Result) ->
case Result of
{ok, X} ->
X;
{error, Error} ->
{error, Error}
end.
-spec then({ok, ATA} | {error, ATB}, fun((ATA) -> {ok, ATE} | {error, ATB})) -> {ok,
ATE} |
{error, ATB}.
then(Result, Fun) ->
case Result of
{ok, X} ->
Fun(X);
{error, E} ->
{error, E}
end.
-spec unwrap({ok, ATJ} | {error, any()}, ATJ) -> ATJ.
unwrap(Result, Default) ->
case Result of
{ok, V} ->
V;
{error, _@1} ->
Default
end.
-spec lazy_unwrap({ok, ATN} | {error, any()}, fun(() -> ATN)) -> ATN.
lazy_unwrap(Result, Default) ->
case Result of
{ok, V} ->
V;
{error, _@1} ->
Default()
end.
-spec unwrap_error({ok, any()} | {error, ATS}, ATS) -> ATS.
unwrap_error(Result, Default) ->
case Result of
{ok, _@1} ->
Default;
{error, E} ->
E
end.
-spec unwrap_both({ok, ATV} | {error, ATV}) -> ATV.
unwrap_both(Result) ->
case Result of
{ok, A} ->
A;
{error, A@1} ->
A@1
end.
-spec nil_error({ok, ATY} | {error, any()}) -> {ok, ATY} | {error, nil}.
nil_error(Result) ->
map_error(Result, fun(_) -> nil end).
-spec 'or'({ok, AUE} | {error, AUF}, {ok, AUE} | {error, AUF}) -> {ok, AUE} |
{error, AUF}.
'or'(First, Second) ->
case First of
{ok, _@1} ->
First;
{error, _@2} ->
Second
end.
-spec lazy_or({ok, AUM} | {error, AUN}, fun(() -> {ok, AUM} | {error, AUN})) -> {ok,
AUM} |
{error, AUN}.
lazy_or(First, Second) ->
case First of
{ok, _@1} ->
First;
{error, _@2} ->
Second()
end.
-spec all(list({ok, AUU} | {error, AUV})) -> {ok, list(AUU)} | {error, AUV}.
all(Results) ->
gleam@list:try_map(Results, fun(X) -> X end).
-spec replace({ok, any()} | {error, AVD}, AVG) -> {ok, AVG} | {error, AVD}.
replace(Result, Value) ->
case Result of
{ok, _@1} ->
{ok, Value};
{error, Error} ->
{error, Error}
end.
-spec replace_error({ok, AVJ} | {error, any()}, AVN) -> {ok, AVJ} | {error, AVN}.
replace_error(Result, Error) ->
case Result of
{ok, X} ->
{ok, X};
{error, _@1} ->
{error, Error}
end.
-spec values(list({ok, AVQ} | {error, any()})) -> list(AVQ).
values(Results) ->
gleam@list:filter_map(Results, fun(R) -> R end).