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

Shortcut let x = y in ...

Browse Source
This commit is contained in:
Ulf Norell 2019-04-08 13:31:46 +02:00
parent 961af8ba93
commit 42c7fde413
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/aeso_fcode_to_fate.erl
View File

@ -141,6 +141,9 @@ to_scode(Env, {'if', Dec, Then, Else}) ->
[ to_scode(notail(Env), Dec), [ to_scode(notail(Env), Dec),
{switch, boolean, [to_scode(Env, Else), to_scode(Env, Then)], missing} ]; {switch, boolean, [to_scode(Env, Else), to_scode(Env, Then)], missing} ];
to_scode(Env, {'let', X, {var, Y}, Body}) ->
Env1 = bind_var(X, lookup_var(Env, Y), Env),
to_scode(Env1, Body);
to_scode(Env, {'let', X, Expr, Body}) -> to_scode(Env, {'let', X, Expr, Body}) ->
{I, Env1} = bind_local(X, Env), {I, Env1} = bind_local(X, Env),
[ to_scode(Env, Expr), [ to_scode(Env, Expr),