diff options
author | Eduardo Julian | 2018-08-20 18:57:06 -0400 |
---|---|---|
committer | Eduardo Julian | 2018-08-20 18:57:06 -0400 |
commit | 7dc94b0ba528b40d13e88732ba307a1a24ac93c3 (patch) | |
tree | e53a0caa7f2bccbe59e07de0874c655baf654681 /luxc | |
parent | bd1523278490c1d07a82ad9deb481ebf29e61fdb (diff) |
- Fixed ordering issue with Lux arithmetic extensions.
- Fixed naming issue with extensions.
Diffstat (limited to '')
-rw-r--r-- | luxc/src/lux/analyser/proc/common.clj | 4 |
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 |