diff options
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 |