Current section
Files
Jump to
Current section
Files
src/gleam@iterator.erl
-module(gleam@iterator).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([unfold/2, repeatedly/1, repeat/1, from_list/1, transform/3, fold/3, run/1, to_list/1, step/1, take/2, drop/2, map/2, map2/3, append/2, flatten/1, concat/1, flat_map/2, filter/2, filter_map/2, cycle/1, find/2, find_map/2, index/1, iterate/2, take_while/2, drop_while/2, scan/3, zip/2, chunk/2, sized_chunk/2, intersperse/2, any/2, all/2, group/2, reduce/2, last/1, empty/0, once/1, range/2, single/1, interleave/2, fold_until/3, try_fold/3, first/1, at/2, length/1, each/2, yield/2]).
-export_type([action/1, iterator/1, step/2, chunk/2, sized_chunk/1]).
-type action(BWJ) :: stop | {continue, BWJ, fun(() -> action(BWJ))}.
-opaque iterator(BWK) :: {iterator, fun(() -> action(BWK))}.
-type step(BWL, BWM) :: {next, BWL, BWM} | done.
-type chunk(BWN, BWO) :: {another_by,
list(BWN),
BWO,
BWN,
fun(() -> action(BWN))} |
{last_by, list(BWN)}.
-type sized_chunk(BWP) :: {another, list(BWP), fun(() -> action(BWP))} |
{last, list(BWP)} |
no_more.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 38).
-spec stop() -> action(any()).
stop() ->
stop.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 43).
-spec do_unfold(BWS, fun((BWS) -> step(BWT, BWS))) -> fun(() -> action(BWT)).
do_unfold(Initial, F) ->
fun() -> case F(Initial) of
{next, X, Acc} ->
{continue, X, do_unfold(Acc, F)};
done ->
stop
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 76).
-spec unfold(BWX, fun((BWX) -> step(BWY, BWX))) -> iterator(BWY).
unfold(Initial, F) ->
_pipe = Initial,
_pipe@1 = do_unfold(_pipe, F),
{iterator, _pipe@1}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 89).
-spec repeatedly(fun(() -> BXC)) -> iterator(BXC).
repeatedly(F) ->
unfold(nil, fun(_) -> {next, F(), nil} end).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 104).
-spec repeat(BXE) -> iterator(BXE).
repeat(X) ->
repeatedly(fun() -> X end).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 118).
-spec from_list(list(BXG)) -> iterator(BXG).
from_list(List) ->
Yield = fun(Acc) -> case Acc of
[] ->
done;
[Head | Tail] ->
{next, Head, Tail}
end end,
unfold(List, Yield).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 129).
-spec do_transform(
fun(() -> action(BXJ)),
BXL,
fun((BXL, BXJ) -> step(BXM, BXL))
) -> fun(() -> action(BXM)).
do_transform(Continuation, State, F) ->
fun() -> case Continuation() of
stop ->
stop;
{continue, El, Next} ->
case F(State, El) of
done ->
stop;
{next, Yield, Next_state} ->
{continue, Yield, do_transform(Next, Next_state, F)}
end
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 164).
-spec transform(iterator(BXQ), BXS, fun((BXS, BXQ) -> step(BXT, BXS))) -> iterator(BXT).
transform(Iterator, Initial, F) ->
_pipe = do_transform(erlang:element(2, Iterator), Initial, F),
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 173).
-spec do_fold(fun(() -> action(BXX)), fun((BXZ, BXX) -> BXZ), BXZ) -> BXZ.
do_fold(Continuation, F, Accumulator) ->
case Continuation() of
{continue, Elem, Next} ->
do_fold(Next, F, F(Accumulator, Elem));
stop ->
Accumulator
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 201).
-spec fold(iterator(BYA), BYC, fun((BYC, BYA) -> BYC)) -> BYC.
fold(Iterator, Initial, F) ->
_pipe = erlang:element(2, Iterator),
do_fold(_pipe, F, Initial).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 215).
-spec run(iterator(any())) -> nil.
run(Iterator) ->
fold(Iterator, nil, fun(_, _) -> nil end).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 233).
-spec to_list(iterator(BYF)) -> list(BYF).
to_list(Iterator) ->
_pipe = Iterator,
_pipe@1 = fold(_pipe, [], fun(Acc, E) -> [E | Acc] end),
lists:reverse(_pipe@1).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 261).
-spec step(iterator(BYI)) -> step(BYI, iterator(BYI)).
step(Iterator) ->
case (erlang:element(2, Iterator))() of
stop ->
done;
{continue, E, A} ->
{next, E, {iterator, A}}
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 268).
-spec do_take(fun(() -> action(BYN)), integer()) -> fun(() -> action(BYN)).
do_take(Continuation, Desired) ->
fun() -> case Desired > 0 of
false ->
stop;
true ->
case Continuation() of
stop ->
stop;
{continue, E, Next} ->
{continue, E, do_take(Next, Desired - 1)}
end
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 301).
-spec take(iterator(BYQ), integer()) -> iterator(BYQ).
take(Iterator, Desired) ->
_pipe = erlang:element(2, Iterator),
_pipe@1 = do_take(_pipe, Desired),
{iterator, _pipe@1}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 307).
-spec do_drop(fun(() -> action(BYT)), integer()) -> action(BYT).
do_drop(Continuation, Desired) ->
case Continuation() of
stop ->
stop;
{continue, E, Next} ->
case Desired > 0 of
true ->
do_drop(Next, Desired - 1);
false ->
{continue, E, Next}
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 343).
-spec drop(iterator(BYW), integer()) -> iterator(BYW).
drop(Iterator, Desired) ->
_pipe = fun() -> do_drop(erlang:element(2, Iterator), Desired) end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 348).
-spec do_map(fun(() -> action(BYZ)), fun((BYZ) -> BZB)) -> fun(() -> action(BZB)).
do_map(Continuation, F) ->
fun() -> case Continuation() of
stop ->
stop;
{continue, E, Continuation@1} ->
{continue, F(E), do_map(Continuation@1, F)}
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 374).
-spec map(iterator(BZD), fun((BZD) -> BZF)) -> iterator(BZF).
map(Iterator, F) ->
_pipe = erlang:element(2, Iterator),
_pipe@1 = do_map(_pipe, F),
{iterator, _pipe@1}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 380).
-spec do_map2(
fun(() -> action(BZH)),
fun(() -> action(BZJ)),
fun((BZH, BZJ) -> BZL)
) -> fun(() -> action(BZL)).
do_map2(Continuation1, Continuation2, Fun) ->
fun() -> case Continuation1() of
stop ->
stop;
{continue, A, Next_a} ->
case Continuation2() of
stop ->
stop;
{continue, B, Next_b} ->
{continue, Fun(A, B), do_map2(Next_a, Next_b, Fun)}
end
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 421).
-spec map2(iterator(BZN), iterator(BZP), fun((BZN, BZP) -> BZR)) -> iterator(BZR).
map2(Iterator1, Iterator2, Fun) ->
_pipe = do_map2(
erlang:element(2, Iterator1),
erlang:element(2, Iterator2),
Fun
),
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 430).
-spec do_append(fun(() -> action(BZT)), fun(() -> action(BZT))) -> action(BZT).
do_append(First, Second) ->
case First() of
{continue, E, First@1} ->
{continue, E, fun() -> do_append(First@1, Second) end};
stop ->
Second()
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 451).
-spec append(iterator(BZX), iterator(BZX)) -> iterator(BZX).
append(First, Second) ->
_pipe = fun() ->
do_append(erlang:element(2, First), erlang:element(2, Second))
end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 456).
-spec do_flatten(fun(() -> action(iterator(CAB)))) -> action(CAB).
do_flatten(Flattened) ->
case Flattened() of
stop ->
stop;
{continue, It, Next_iterator} ->
do_append(
erlang:element(2, It),
fun() -> do_flatten(Next_iterator) end
)
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 479).
-spec flatten(iterator(iterator(CAF))) -> iterator(CAF).
flatten(Iterator) ->
_pipe = fun() -> do_flatten(erlang:element(2, Iterator)) end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 499).
-spec concat(list(iterator(CAJ))) -> iterator(CAJ).
concat(Iterators) ->
flatten(from_list(Iterators)).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 521).
-spec flat_map(iterator(CAN), fun((CAN) -> iterator(CAP))) -> iterator(CAP).
flat_map(Iterator, F) ->
_pipe = Iterator,
_pipe@1 = map(_pipe, F),
flatten(_pipe@1).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 530).
-spec do_filter(fun(() -> action(CAS)), fun((CAS) -> boolean())) -> action(CAS).
do_filter(Continuation, Predicate) ->
case Continuation() of
stop ->
stop;
{continue, E, Iterator} ->
case Predicate(E) of
true ->
{continue, E, fun() -> do_filter(Iterator, Predicate) end};
false ->
do_filter(Iterator, Predicate)
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 563).
-spec filter(iterator(CAV), fun((CAV) -> boolean())) -> iterator(CAV).
filter(Iterator, Predicate) ->
_pipe = fun() -> do_filter(erlang:element(2, Iterator), Predicate) end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 571).
-spec do_filter_map(
fun(() -> action(CAY)),
fun((CAY) -> {ok, CBA} | {error, any()})
) -> action(CBA).
do_filter_map(Continuation, F) ->
case Continuation() of
stop ->
stop;
{continue, E, Next} ->
case F(E) of
{ok, E@1} ->
{continue, E@1, fun() -> do_filter_map(Next, F) end};
{error, _} ->
do_filter_map(Next, F)
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 607).
-spec filter_map(iterator(CBF), fun((CBF) -> {ok, CBH} | {error, any()})) -> iterator(CBH).
filter_map(Iterator, F) ->
_pipe = fun() -> do_filter_map(erlang:element(2, Iterator), F) end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 627).
-spec cycle(iterator(CBM)) -> iterator(CBM).
cycle(Iterator) ->
_pipe = repeat(Iterator),
flatten(_pipe).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 673).
-spec do_find(fun(() -> action(CBQ)), fun((CBQ) -> boolean())) -> {ok, CBQ} |
{error, nil}.
do_find(Continuation, F) ->
case Continuation() of
stop ->
{error, nil};
{continue, E, Next} ->
case F(E) of
true ->
{ok, E};
false ->
do_find(Next, F)
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 707).
-spec find(iterator(CBU), fun((CBU) -> boolean())) -> {ok, CBU} | {error, nil}.
find(Haystack, Is_desired) ->
_pipe = erlang:element(2, Haystack),
do_find(_pipe, Is_desired).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 715).
-spec do_find_map(
fun(() -> action(CBY)),
fun((CBY) -> {ok, CCA} | {error, any()})
) -> {ok, CCA} | {error, nil}.
do_find_map(Continuation, F) ->
case Continuation() of
stop ->
{error, nil};
{continue, E, Next} ->
case F(E) of
{ok, E@1} ->
{ok, E@1};
{error, _} ->
do_find_map(Next, F)
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 752).
-spec find_map(iterator(CCG), fun((CCG) -> {ok, CCI} | {error, any()})) -> {ok,
CCI} |
{error, nil}.
find_map(Haystack, Is_desired) ->
_pipe = erlang:element(2, Haystack),
do_find_map(_pipe, Is_desired).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 760).
-spec do_index(fun(() -> action(CCO)), integer()) -> fun(() -> action({CCO,
integer()})).
do_index(Continuation, Next) ->
fun() -> case Continuation() of
stop ->
stop;
{continue, E, Continuation@1} ->
{continue, {E, Next}, do_index(Continuation@1, Next + 1)}
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 782).
-spec index(iterator(CCR)) -> iterator({CCR, integer()}).
index(Iterator) ->
_pipe = erlang:element(2, Iterator),
_pipe@1 = do_index(_pipe, 0),
{iterator, _pipe@1}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 797).
-spec iterate(CCU, fun((CCU) -> CCU)) -> iterator(CCU).
iterate(Initial, F) ->
unfold(Initial, fun(Element) -> {next, Element, F(Element)} end).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 804).
-spec do_take_while(fun(() -> action(CCW)), fun((CCW) -> boolean())) -> fun(() -> action(CCW)).
do_take_while(Continuation, Predicate) ->
fun() -> case Continuation() of
stop ->
stop;
{continue, E, Next} ->
case Predicate(E) of
false ->
stop;
true ->
{continue, E, do_take_while(Next, Predicate)}
end
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 831).
-spec take_while(iterator(CCZ), fun((CCZ) -> boolean())) -> iterator(CCZ).
take_while(Iterator, Predicate) ->
_pipe = erlang:element(2, Iterator),
_pipe@1 = do_take_while(_pipe, Predicate),
{iterator, _pipe@1}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 840).
-spec do_drop_while(fun(() -> action(CDC)), fun((CDC) -> boolean())) -> action(CDC).
do_drop_while(Continuation, Predicate) ->
case Continuation() of
stop ->
stop;
{continue, E, Next} ->
case Predicate(E) of
false ->
{continue, E, Next};
true ->
do_drop_while(Next, Predicate)
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 866).
-spec drop_while(iterator(CDF), fun((CDF) -> boolean())) -> iterator(CDF).
drop_while(Iterator, Predicate) ->
_pipe = fun() -> do_drop_while(erlang:element(2, Iterator), Predicate) end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 874).
-spec do_scan(fun(() -> action(CDI)), fun((CDK, CDI) -> CDK), CDK) -> fun(() -> action(CDK)).
do_scan(Continuation, F, Accumulator) ->
fun() -> case Continuation() of
stop ->
stop;
{continue, El, Next} ->
Accumulated = F(Accumulator, El),
{continue, Accumulated, do_scan(Next, F, Accumulated)}
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 904).
-spec scan(iterator(CDM), CDO, fun((CDO, CDM) -> CDO)) -> iterator(CDO).
scan(Iterator, Initial, F) ->
_pipe = erlang:element(2, Iterator),
_pipe@1 = do_scan(_pipe, F, Initial),
{iterator, _pipe@1}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 914).
-spec do_zip(fun(() -> action(CDQ)), fun(() -> action(CDS))) -> fun(() -> action({CDQ,
CDS})).
do_zip(Left, Right) ->
fun() -> case Left() of
stop ->
stop;
{continue, El_left, Next_left} ->
case Right() of
stop ->
stop;
{continue, El_right, Next_right} ->
{continue,
{El_left, El_right},
do_zip(Next_left, Next_right)}
end
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 943).
-spec zip(iterator(CDV), iterator(CDX)) -> iterator({CDV, CDX}).
zip(Left, Right) ->
_pipe = do_zip(erlang:element(2, Left), erlang:element(2, Right)),
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 954).
-spec next_chunk(fun(() -> action(CEA)), fun((CEA) -> CEC), CEC, list(CEA)) -> chunk(CEA, CEC).
next_chunk(Continuation, F, Previous_key, Current_chunk) ->
case Continuation() of
stop ->
{last_by, lists:reverse(Current_chunk)};
{continue, E, Next} ->
Key = F(E),
case Key =:= Previous_key of
true ->
next_chunk(Next, F, Key, [E | Current_chunk]);
false ->
{another_by, lists:reverse(Current_chunk), Key, E, Next}
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 972).
-spec do_chunk(fun(() -> action(CEG)), fun((CEG) -> CEI), CEI, CEG) -> action(list(CEG)).
do_chunk(Continuation, F, Previous_key, Previous_element) ->
case next_chunk(Continuation, F, Previous_key, [Previous_element]) of
{last_by, Chunk} ->
{continue, Chunk, fun stop/0};
{another_by, Chunk@1, Key, El, Next} ->
{continue, Chunk@1, fun() -> do_chunk(Next, F, Key, El) end}
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 997).
-spec chunk(iterator(CEL), fun((CEL) -> any())) -> iterator(list(CEL)).
chunk(Iterator, F) ->
_pipe = fun() -> case (erlang:element(2, Iterator))() of
stop ->
stop;
{continue, E, Next} ->
do_chunk(Next, F, F(E), E)
end end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1017).
-spec next_sized_chunk(fun(() -> action(CEQ)), integer(), list(CEQ)) -> sized_chunk(CEQ).
next_sized_chunk(Continuation, Left, Current_chunk) ->
case Continuation() of
stop ->
case Current_chunk of
[] ->
no_more;
Remaining ->
{last, lists:reverse(Remaining)}
end;
{continue, E, Next} ->
Chunk = [E | Current_chunk],
case Left > 1 of
false ->
{another, lists:reverse(Chunk), Next};
true ->
next_sized_chunk(Next, Left - 1, Chunk)
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1038).
-spec do_sized_chunk(fun(() -> action(CEU)), integer()) -> fun(() -> action(list(CEU))).
do_sized_chunk(Continuation, Count) ->
fun() -> case next_sized_chunk(Continuation, Count, []) of
no_more ->
stop;
{last, Chunk} ->
{continue, Chunk, fun stop/0};
{another, Chunk@1, Next_element} ->
{continue, Chunk@1, do_sized_chunk(Next_element, Count)}
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1075).
-spec sized_chunk(iterator(CEY), integer()) -> iterator(list(CEY)).
sized_chunk(Iterator, Count) ->
_pipe = erlang:element(2, Iterator),
_pipe@1 = do_sized_chunk(_pipe, Count),
{iterator, _pipe@1}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1084).
-spec do_intersperse(fun(() -> action(CFC)), CFC) -> action(CFC).
do_intersperse(Continuation, Separator) ->
case Continuation() of
stop ->
stop;
{continue, E, Next} ->
Next_interspersed = fun() -> do_intersperse(Next, Separator) end,
{continue, Separator, fun() -> {continue, E, Next_interspersed} end}
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1123).
-spec intersperse(iterator(CFF), CFF) -> iterator(CFF).
intersperse(Iterator, Elem) ->
_pipe = fun() -> case (erlang:element(2, Iterator))() of
stop ->
stop;
{continue, E, Next} ->
{continue, E, fun() -> do_intersperse(Next, Elem) end}
end end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1136).
-spec do_any(fun(() -> action(CFI)), fun((CFI) -> boolean())) -> boolean().
do_any(Continuation, Predicate) ->
case Continuation() of
stop ->
false;
{continue, E, Next} ->
case Predicate(E) of
true ->
true;
false ->
do_any(Next, Predicate)
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1177).
-spec any(iterator(CFK), fun((CFK) -> boolean())) -> boolean().
any(Iterator, Predicate) ->
_pipe = erlang:element(2, Iterator),
do_any(_pipe, Predicate).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1185).
-spec do_all(fun(() -> action(CFM)), fun((CFM) -> boolean())) -> boolean().
do_all(Continuation, Predicate) ->
case Continuation() of
stop ->
true;
{continue, E, Next} ->
case Predicate(E) of
true ->
do_all(Next, Predicate);
false ->
false
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1226).
-spec all(iterator(CFO), fun((CFO) -> boolean())) -> boolean().
all(Iterator, Predicate) ->
_pipe = erlang:element(2, Iterator),
do_all(_pipe, Predicate).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1234).
-spec update_group_with(CFQ) -> fun((gleam@option:option(list(CFQ))) -> list(CFQ)).
update_group_with(El) ->
fun(Maybe_group) -> case Maybe_group of
{some, Group} ->
[El | Group];
none ->
[El]
end end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1243).
-spec group_updater(fun((CFU) -> CFV)) -> fun((gleam@dict:dict(CFV, list(CFU)), CFU) -> gleam@dict:dict(CFV, list(CFU))).
group_updater(F) ->
fun(Groups, Elem) -> _pipe = Groups,
gleam@dict:update(_pipe, F(Elem), update_group_with(Elem)) end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1265).
-spec group(iterator(CGC), fun((CGC) -> CGE)) -> gleam@dict:dict(CGE, list(CGC)).
group(Iterator, Key) ->
_pipe = Iterator,
_pipe@1 = fold(_pipe, gleam@dict:new(), group_updater(Key)),
gleam@dict:map_values(_pipe@1, fun(_, Group) -> lists:reverse(Group) end).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1295).
-spec reduce(iterator(CGI), fun((CGI, CGI) -> CGI)) -> {ok, CGI} | {error, nil}.
reduce(Iterator, F) ->
case (erlang:element(2, Iterator))() of
stop ->
{error, nil};
{continue, E, Next} ->
_pipe = do_fold(Next, F, E),
{ok, _pipe}
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1325).
-spec last(iterator(CGM)) -> {ok, CGM} | {error, nil}.
last(Iterator) ->
_pipe = Iterator,
reduce(_pipe, fun(_, Elem) -> Elem end).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1339).
-spec empty() -> iterator(any()).
empty() ->
{iterator, fun stop/0}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1352).
-spec once(fun(() -> CGS)) -> iterator(CGS).
once(F) ->
_pipe = fun() -> {continue, F(), fun stop/0} end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 652).
-spec range(integer(), integer()) -> iterator(integer()).
range(Start, Stop) ->
case gleam@int:compare(Start, Stop) of
eq ->
once(fun() -> Start end);
gt ->
unfold(Start, fun(Current) -> case Current < Stop of
false ->
{next, Current, Current - 1};
true ->
done
end end);
lt ->
unfold(Start, fun(Current@1) -> case Current@1 > Stop of
false ->
{next, Current@1, Current@1 + 1};
true ->
done
end end)
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1366).
-spec single(CGU) -> iterator(CGU).
single(Elem) ->
once(fun() -> Elem end).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1370).
-spec do_interleave(fun(() -> action(CGW)), fun(() -> action(CGW))) -> action(CGW).
do_interleave(Current, Next) ->
case Current() of
stop ->
Next();
{continue, E, Next_other} ->
{continue, E, fun() -> do_interleave(Next, Next_other) end}
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1400).
-spec interleave(iterator(CHA), iterator(CHA)) -> iterator(CHA).
interleave(Left, Right) ->
_pipe = fun() ->
do_interleave(erlang:element(2, Left), erlang:element(2, Right))
end,
{iterator, _pipe}.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1408).
-spec do_fold_until(
fun(() -> action(CHE)),
fun((CHG, CHE) -> gleam@list:continue_or_stop(CHG)),
CHG
) -> CHG.
do_fold_until(Continuation, F, Accumulator) ->
case Continuation() of
stop ->
Accumulator;
{continue, Elem, Next} ->
case F(Accumulator, Elem) of
{continue, Accumulator@1} ->
do_fold_until(Next, F, Accumulator@1);
{stop, Accumulator@2} ->
Accumulator@2
end
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1447).
-spec fold_until(
iterator(CHI),
CHK,
fun((CHK, CHI) -> gleam@list:continue_or_stop(CHK))
) -> CHK.
fold_until(Iterator, Initial, F) ->
_pipe = erlang:element(2, Iterator),
do_fold_until(_pipe, F, Initial).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1456).
-spec do_try_fold(
fun(() -> action(CHM)),
fun((CHO, CHM) -> {ok, CHO} | {error, CHP}),
CHO
) -> {ok, CHO} | {error, CHP}.
do_try_fold(Continuation, F, Accumulator) ->
case Continuation() of
stop ->
{ok, Accumulator};
{continue, Elem, Next} ->
gleam@result:'try'(
F(Accumulator, Elem),
fun(Accumulator@1) -> do_try_fold(Next, F, Accumulator@1) end
)
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1489).
-spec try_fold(iterator(CHU), CHW, fun((CHW, CHU) -> {ok, CHW} | {error, CHX})) -> {ok,
CHW} |
{error, CHX}.
try_fold(Iterator, Initial, F) ->
_pipe = erlang:element(2, Iterator),
do_try_fold(_pipe, F, Initial).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1512).
-spec first(iterator(CIC)) -> {ok, CIC} | {error, nil}.
first(Iterator) ->
case (erlang:element(2, Iterator))() of
stop ->
{error, nil};
{continue, E, _} ->
{ok, E}
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1542).
-spec at(iterator(CIG), integer()) -> {ok, CIG} | {error, nil}.
at(Iterator, Index) ->
_pipe = Iterator,
_pipe@1 = drop(_pipe, Index),
first(_pipe@1).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1548).
-spec do_length(fun(() -> action(any())), integer()) -> integer().
do_length(Continuation, Length) ->
case Continuation() of
stop ->
Length;
{continue, _, Next} ->
do_length(Next, Length + 1)
end.
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1572).
-spec length(iterator(any())) -> integer().
length(Iterator) ->
_pipe = erlang:element(2, Iterator),
do_length(_pipe, 0).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1594).
-spec each(iterator(CIO), fun((CIO) -> any())) -> nil.
each(Iterator, F) ->
_pipe = Iterator,
_pipe@1 = map(_pipe, F),
run(_pipe@1).
-file("/home/pgbiel/GitHub/glistix_stdlib/src/gleam/iterator.gleam", 1619).
-spec yield(CIR, fun(() -> iterator(CIR))) -> iterator(CIR).
yield(Element, Next) ->
{iterator, fun() -> {continue, Element, erlang:element(2, Next())} end}.