diff options
| author | Louis Pilfold <louis@lpil.uk> | 2019-09-17 20:52:37 +0100 |
|---|---|---|
| committer | Louis Pilfold <louis@lpil.uk> | 2019-09-17 22:20:26 +0100 |
| commit | 7ef601e5f01d3f63d93a88675754bd745267d71a (patch) | |
| tree | 5efc68b6befb903c40598c91b9d18e574957b602 /gen/src | |
| parent | dcf7b566a74c9388f491cbb14454c3789868ba30 (diff) | |
| download | gleam_stdlib-7ef601e5f01d3f63d93a88675754bd745267d71a.tar.gz gleam_stdlib-7ef601e5f01d3f63d93a88675754bd745267d71a.zip | |
Unify error types
Diffstat (limited to 'gen/src')
| -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) -> |