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

Add loop operator in fcode #889

Open
zxq9 wants to merge 27 commits from loop-op into master
pull from: loop-op
merge into: QPQ-AG:master
Conversation 3 Commits 27 Files Changed 2 +2 -2
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files
Showing only changes of commit 5575d3cb17 - Show all commits

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}
)}, )},