aboutsummaryrefslogtreecommitdiff
path: root/luxc
diff options
context:
space:
mode:
authorEduardo Julian2018-08-20 18:57:06 -0400
committerEduardo Julian2018-08-20 18:57:06 -0400
commit7dc94b0ba528b40d13e88732ba307a1a24ac93c3 (patch)
treee53a0caa7f2bccbe59e07de0874c655baf654681 /luxc
parentbd1523278490c1d07a82ad9deb481ebf29e61fdb (diff)
- Fixed ordering issue with Lux arithmetic extensions.
- Fixed naming issue with extensions.
Diffstat (limited to 'luxc')
-rw-r--r--luxc/src/lux/analyser/proc/common.clj4
1 files changed, 2 insertions, 2 deletions
diff --git a/luxc/src/lux/analyser/proc/common.clj b/luxc/src/lux/analyser/proc/common.clj
index f382c2ff3..8c6bd9d88 100644
--- a/luxc/src/lux/analyser/proc/common.clj
+++ b/luxc/src/lux/analyser/proc/common.clj
@@ -135,9 +135,9 @@
(let [inputT <input-type>
outputT <output-type>]
(defn <name> [analyse exo-type ?values]
- (|do [:let [(&/$Cons paramC (&/$Cons subjectC (&/$Nil))) ?values]
- paramA (&&/analyse-1 analyse <input-type> paramC)
+ (|do [:let [(&/$Cons subjectC (&/$Cons paramC (&/$Nil))) ?values]
subjectA (&&/analyse-1 analyse <input-type> subjectC)
+ paramA (&&/analyse-1 analyse <input-type> paramC)
_ (&type/check exo-type <output-type>)
_cursor &/cursor]
(return (&/|list (&&/|meta exo-type _cursor