QPQ-AG/sophia
10
0
Fork 0
Code Issues 41 Pull Requests 5 Actions Packages Projects Releases 16 Wiki Activity

.

Browse Source
This commit is contained in:
radrow 2022-07-03 19:12:33 +02:00
parent 1d6f24965b
commit 5575d3cb17
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/aeso_ast_to_fcode.erl
View File

@ -661,9 +661,9 @@ expr_to_fcode(Env, _Type, {app, _, {'..', _}, [A, B]}) ->
Init = {tuple, [nil, expr_to_fcode(Env, B)]}, Init = {tuple, [nil, expr_to_fcode(Env, B)]},
Loop = {loop, Init, St, Loop = {loop, Init, St,
make_if( make_if(
{op, '=<', [ItProj, {var, AV}]}, {op, '>=', [ItProj, {var, AV}]},
{continue, {tuple, [{op, '::', [ItProj, AcProj]}, {continue, {tuple, [{op, '::', [ItProj, AcProj]},
{op, '+', [ItProj, {lit, {int, 1}}]} {op, '-', [ItProj, {lit, {int, 1}}]}
]}}, ]}},
{break, AcProj} {break, AcProj}
)}, )},