refactor(tlsgc): simplify `fold_config/4`

This commit is contained in:
Andrew Mayorov 2023-06-05 18:27:09 +03:00
parent f8e8b7993b
commit 31d38e18c9
No known key found for this signature in database
GPG Key ID: 2837C62ACFBFED5D
1 changed files with 2 additions and 8 deletions

View File

@ -267,14 +267,8 @@ fold_config(FoldFun, Acc, Stack, Config) ->
fold_confval(FoldFun, Acc, Stack, Config).
fold_confarray(FoldFun, AccIn, StackIn, I, [H | T]) ->
Stack = [I | StackIn],
case FoldFun(Stack, H, AccIn) of
{cont, Acc} ->
AccOut = fold_config(FoldFun, Acc, Stack, H),
fold_confarray(FoldFun, AccOut, StackIn, I + 1, T);
{stop, Acc} ->
fold_confarray(FoldFun, Acc, StackIn, I + 1, T)
end;
Acc = fold_subconf(FoldFun, AccIn, [I | StackIn], H),
fold_confarray(FoldFun, Acc, StackIn, I + 1, T);
fold_confarray(_FoldFun, Acc, _Stack, _, []) ->
Acc.