diff options
Diffstat (limited to 'new-luxc/source/luxc/synthesizer/loop.lux')
| -rw-r--r-- | new-luxc/source/luxc/synthesizer/loop.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/new-luxc/source/luxc/synthesizer/loop.lux b/new-luxc/source/luxc/synthesizer/loop.lux index 06b1d1bb0..9f4d09a49 100644 --- a/new-luxc/source/luxc/synthesizer/loop.lux +++ b/new-luxc/source/luxc/synthesizer/loop.lux @@ -32,7 +32,7 @@ (#ls;Function arity environment bodyS) (list;any? &&function;self? environment) - (#ls;Call funcS argsS) + (#ls;Call argsS funcS) (or (contains-self-reference? funcS) (list;any? contains-self-reference? argsS)) @@ -81,11 +81,11 @@ _ pathS)))) - (^multi (#ls;Call (#ls;Variable 0) argsS) + (^multi (#ls;Call argsS (#ls;Variable 0)) (n.= arity (list;size argsS))) (#ls;Recur argsS) - (#ls;Call (#ls;Variable var) argsS) + (#ls;Call argsS (#ls;Variable var)) exprS (#ls;Let register inputS bodyS) @@ -136,8 +136,8 @@ (L/map resolve-captured scope) (recur bodyS)) - (#ls;Call funcS argsS) - (#ls;Call (recur funcS) (L/map recur argsS)) + (#ls;Call argsS funcS) + (#ls;Call (L/map recur argsS) (recur funcS)) (#ls;Recur argsS) (#ls;Recur (L/map recur argsS)) |