diff options
Diffstat (limited to 'gen')
| -rw-r--r-- | gen/src/gleam@list.erl | 12 | ||||
| -rw-r--r-- | gen/src/gleam@map.erl | 2 |
2 files changed, 7 insertions, 7 deletions
diff --git a/gen/src/gleam@list.erl b/gen/src/gleam@list.erl index e8eabd2..324395f 100644 --- a/gen/src/gleam@list.erl +++ b/gen/src/gleam@list.erl @@ -24,7 +24,7 @@ contains(List, Elem) -> head(List) -> case List of [] -> - {error, empty}; + {error, {}}; [X | _] -> {ok, X} @@ -33,7 +33,7 @@ head(List) -> tail(List) -> case List of [] -> - {error, empty}; + {error, {}}; [_ | Xs] -> {ok, Xs} @@ -172,7 +172,7 @@ fold_right(List, Acc, Fun) -> find(Haystack, F) -> case Haystack of [] -> - {error, not_found}; + {error, {}}; [X | Rest] -> case F(X) of @@ -232,7 +232,7 @@ strict_zip(L1, L2) -> {ok, zip(L1, L2)}; false -> - {error, length_mismatch} + {error, {}} end. intersperse(List, Elem) -> @@ -250,12 +250,12 @@ intersperse(List, Elem) -> at(List, I) -> case I < 0 of true -> - {error, not_found}; + {error, {}}; false -> case List of [] -> - {error, not_found}; + {error, {}}; [X | Rest] -> case I =:= 0 of diff --git a/gen/src/gleam@map.erl b/gen/src/gleam@map.erl index e3a2e35..b93f8bd 100644 --- a/gen/src/gleam@map.erl +++ b/gen/src/gleam@map.erl @@ -72,7 +72,7 @@ update(Dict, Key, F) -> put(Dict, Key, F({ok, Value})); {error, _} -> - put(Dict, Key, F({error, not_found})) + put(Dict, Key, F({error, nil})) end. do_fold(List, Acc, F) -> |