aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/synthesizer
diff options
context:
space:
mode:
authorEduardo Julian2017-09-19 19:24:09 -0400
committerEduardo Julian2017-09-19 19:24:09 -0400
commit3744a2212a89d4ab0f176350d2d2f90696235a40 (patch)
tree28e9da49deddcb8253fca2ae94f479ba64cb5536 /new-luxc/source/luxc/synthesizer
parente6afba3e17f03ed0652d18a26d0f3c053a49e7a5 (diff)
- Function generation.
Diffstat (limited to 'new-luxc/source/luxc/synthesizer')
-rw-r--r--new-luxc/source/luxc/synthesizer/loop.lux10
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))