aboutsummaryrefslogtreecommitdiff
path: root/gen/src
diff options
context:
space:
mode:
Diffstat (limited to 'gen/src')
-rw-r--r--gen/src/gleam@any.erl4
-rw-r--r--gen/src/gleam@iodata.erl8
-rw-r--r--gen/src/gleam@list.erl50
-rw-r--r--gen/src/gleam@map.erl28
-rw-r--r--gen/src/gleam@pair.erl8
-rw-r--r--gen/src/gleam@string.erl14
6 files changed, 57 insertions, 55 deletions
diff --git a/gen/src/gleam@any.erl b/gen/src/gleam@any.erl
index b55ce9f..9f2a8e6 100644
--- a/gen/src/gleam@any.erl
+++ b/gen/src/gleam@any.erl
@@ -30,10 +30,10 @@ thunk(A) ->
list_any(A) ->
gleam_stdlib:decode_list(A).
-list(Any, Decode) ->
+list(Any, DecoderType) ->
gleam@result:then(
list_any(Any),
- fun(Capture1) -> gleam@list:traverse(Capture1, Decode) end
+ fun(Capture1) -> gleam@list:traverse(Capture1, DecoderType) end
).
pair(A) ->
diff --git a/gen/src/gleam@iodata.erl b/gen/src/gleam@iodata.erl
index b70ad78..5d0c434 100644
--- a/gen/src/gleam@iodata.erl
+++ b/gen/src/gleam@iodata.erl
@@ -45,14 +45,14 @@ reverse(A) ->
erl_split(A, B, C) ->
string:split(A, B, C).
-split(Iodata, On) ->
- erl_split(Iodata, On, all).
+split(Iodata, Pattern) ->
+ erl_split(Iodata, Pattern, all).
erl_replace(A, B, C, D) ->
string:replace(A, B, C, D).
-replace(Iodata, Pattern, Replacement) ->
- erl_replace(Iodata, Pattern, Replacement, all).
+replace(Iodata, Pattern, Substitute) ->
+ erl_replace(Iodata, Pattern, Substitute, all).
is_equal(A, B) ->
string:equal(A, B).
diff --git a/gen/src/gleam@list.erl b/gen/src/gleam@list.erl
index 4e3a60d..508da27 100644
--- a/gen/src/gleam@list.erl
+++ b/gen/src/gleam@list.erl
@@ -55,8 +55,8 @@ do_filter(List, Fun, Acc) ->
do_filter(Xs, Fun, NewAcc)
end.
-filter(List, Fun) ->
- do_filter(List, Fun, []).
+filter(List, Predicate) ->
+ do_filter(List, Predicate, []).
do_map(List, Fun, Acc) ->
case List of
@@ -151,63 +151,63 @@ do_flatten(Lists, Acc) ->
flatten(Lists) ->
do_flatten(Lists, []).
-fold(List, Acc, Fun) ->
+fold(List, Initial, Fun) ->
case List of
[] ->
- Acc;
+ Initial;
[X | Rest] ->
- fold(Rest, Fun(X, Acc), Fun)
+ fold(Rest, Fun(X, Initial), Fun)
end.
-fold_right(List, Acc, Fun) ->
+fold_right(List, Initial, Fun) ->
case List of
[] ->
- Acc;
+ Initial;
[X | Rest] ->
- Fun(X, fold_right(Rest, Acc, Fun))
+ Fun(X, fold_right(Rest, Initial, Fun))
end.
-find(Haystack, F) ->
+find(Haystack, Predicate) ->
case Haystack of
[] ->
{error, nil};
[X | Rest] ->
- case F(X) of
+ case Predicate(X) of
{ok, X1} ->
{ok, X1};
_ ->
- find(Rest, F)
+ find(Rest, Predicate)
end
end.
-all(List, F) ->
+all(List, Predicate) ->
case List of
[] ->
true;
[X | Rest] ->
- case F(X) of
+ case Predicate(X) of
true ->
- all(Rest, F);
+ all(Rest, Predicate);
_ ->
false
end
end.
-any(List, F) ->
+any(List, Predicate) ->
case List of
[] ->
false;
[X | Rest] ->
- case F(X) of
+ case Predicate(X) of
false ->
- any(Rest, F);
+ any(Rest, Predicate);
_ ->
true
@@ -247,8 +247,8 @@ intersperse(List, Elem) ->
[X1, Elem | intersperse(Rest, Elem)]
end.
-at(List, I) ->
- case I < 0 of
+at(List, Index) ->
+ case Index < 0 of
true ->
{error, nil};
@@ -258,12 +258,12 @@ at(List, I) ->
{error, nil};
[X | Rest] ->
- case I =:= 0 of
+ case Index =:= 0 of
true ->
{ok, X};
false ->
- at(Rest, I - 1)
+ at(Rest, Index - 1)
end
end
end.
@@ -353,8 +353,8 @@ do_split(List, N, Taken) ->
end
end.
-split(List, N) ->
- do_split(List, N, []).
+split(List, Target) ->
+ do_split(List, Target, []).
do_split_while(List, F, Acc) ->
case List of
@@ -371,8 +371,8 @@ do_split_while(List, F, Acc) ->
end
end.
-split_while(List, F) ->
- do_split_while(List, F, []).
+split_while(List, Predicate) ->
+ do_split_while(List, Predicate, []).
key_find(Haystack, Needle) ->
find(Haystack, fun(P) -> case gleam@pair:first(P) =:= Needle of
diff --git a/gen/src/gleam@map.erl b/gen/src/gleam@map.erl
index 778509c..ce77ac1 100644
--- a/gen/src/gleam@map.erl
+++ b/gen/src/gleam@map.erl
@@ -45,14 +45,14 @@ values(A) ->
erl_filter(A, B) ->
maps:filter(A, B).
-filter(Map, Fun) ->
- erl_filter(Fun, Map).
+filter(Map, Predicate) ->
+ erl_filter(Predicate, Map).
erl_take(A, B) ->
maps:with(A, B).
-take(Map, Keys) ->
- erl_take(Keys, Map).
+take(Map, DesiredKeys) ->
+ erl_take(DesiredKeys, Map).
merge(A, B) ->
maps:merge(A, B).
@@ -63,27 +63,27 @@ erl_delete(A, B) ->
delete(Map, Key) ->
erl_delete(Key, Map).
-drop(Map, Keys) ->
- gleam@list:fold(Keys, Map, fun(Key, Acc) -> delete(Acc, Key) end).
+drop(Map, DisallowedKeys) ->
+ gleam@list:fold(DisallowedKeys, Map, fun(Key, Acc) -> delete(Acc, Key) end).
-update(Map, Key, F) ->
+update(Map, Key, Fun) ->
case get(Map, Key) of
{ok, Value} ->
- insert(Map, Key, F({ok, Value}));
+ insert(Map, Key, Fun({ok, Value}));
{error, _} ->
- insert(Map, Key, F({error, nil}))
+ insert(Map, Key, Fun({error, nil}))
end.
-do_fold(List, Acc, F) ->
+do_fold(List, Initial, Fun) ->
case List of
[] ->
- Acc;
+ Initial;
[{K, V} | Tail] ->
- do_fold(Tail, F(K, V, Acc), F)
+ do_fold(Tail, Fun(K, V, Initial), Fun)
end.
-fold(Map, Acc, F) ->
+fold(Map, Initial, Fun) ->
Kvs = to_list(Map),
- do_fold(Kvs, Acc, F).
+ do_fold(Kvs, Initial, Fun).
diff --git a/gen/src/gleam@pair.erl b/gen/src/gleam@pair.erl
index 3361dc7..0f8e8be 100644
--- a/gen/src/gleam@pair.erl
+++ b/gen/src/gleam@pair.erl
@@ -15,10 +15,10 @@ swap(Tup) ->
{A, B} = Tup,
{B, A}.
-map_first(Tup, F) ->
+map_first(Tup, Fun) ->
{A, B} = Tup,
- {F(A), B}.
+ {Fun(A), B}.
-map_second(Tup, F) ->
+map_second(Tup, Fun) ->
{A, B} = Tup,
- {A, F(B)}.
+ {A, Fun(B)}.
diff --git a/gen/src/gleam@string.erl b/gen/src/gleam@string.erl
index 81b6495..722ea09 100644
--- a/gen/src/gleam@string.erl
+++ b/gen/src/gleam@string.erl
@@ -18,16 +18,18 @@ compare(A, B) ->
reverse(String) ->
gleam@iodata:to_string(gleam@iodata:reverse(gleam@iodata:new(String))).
-split(String, On) ->
+split(X, Pattern) ->
gleam@list:map(
- gleam@iodata:split(gleam@iodata:new(String), On),
+ gleam@iodata:split(gleam@iodata:new(X), Pattern),
fun gleam@iodata:to_string/1
).
-replace(String, Pattern, With) ->
+replace(String, Pattern, Substitute) ->
gleam@iodata:to_string(
- gleam@iodata:replace(gleam@iodata:new(String), Pattern, With)
+ gleam@iodata:replace(gleam@iodata:new(String), Pattern, Substitute)
).
-append(S1, S2) ->
- gleam@iodata:to_string(gleam@iodata:append(gleam@iodata:new(S1), S2)).
+append(First, Second) ->
+ gleam@iodata:to_string(
+ gleam@iodata:append(gleam@iodata:new(First), Second)
+ ).