X-Git-Url: https://git.xandkar.net/?p=hope.git;a=blobdiff_plain;f=src%2Fhope_option.erl;fp=src%2Fhope_option.erl;h=2bd9e7b05180a436993afd3d54ff5e2d563565c2;hp=29836f768668a507931dd10572984b8c22755f63;hb=5fab324af707977a6e08246757acd09e1a3cb7c1;hpb=4744fed98ce752dde11c03aeaf8d90983efe5ea6 diff --git a/src/hope_option.erl b/src/hope_option.erl index 29836f7..2bd9e7b 100644 --- a/src/hope_option.erl +++ b/src/hope_option.erl @@ -19,6 +19,7 @@ , iter/2 , of_result/1 , of_undefined/1 + , to_undefined/1 , validate/2 ]). @@ -85,6 +86,11 @@ of_result({error, _}) -> none. of_undefined(undefined) -> none; of_undefined(X) -> {some, X}. +-spec to_undefined(t(A)) -> + undefined | A. +to_undefined(none) -> undefined; +to_undefined({some, X}) -> X. + -spec validate(t(A), fun((A) -> boolean())) -> t(A). validate(none, _) ->