From 2914f38f7c3795a63f555409361bc1b317e871a9 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 4 Apr 2019 20:40:50 -0400
Subject: Forgot "lux text char".

---
 luxc/src/lux/analyser/proc/common.clj | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'luxc/src')

diff --git a/luxc/src/lux/analyser/proc/common.clj b/luxc/src/lux/analyser/proc/common.clj
index 8f51521d8..cbe741a34 100644
--- a/luxc/src/lux/analyser/proc/common.clj
+++ b/luxc/src/lux/analyser/proc/common.clj
@@ -91,9 +91,9 @@
   )
 
 (defn- analyse-text-char [analyse exo-type ?values]
-  (|do [:let [(&/$Cons text (&/$Cons idx (&/$Nil))) ?values]
-        =text (&&/analyse-1 analyse &type/Text text)
+  (|do [:let [(&/$Cons idx (&/$Cons text (&/$Nil))) ?values]
         =idx (&&/analyse-1 analyse &type/Nat idx)
+        =text (&&/analyse-1 analyse &type/Text text)
         _ (&type/check exo-type &type/Nat)
         _cursor &/cursor]
     (return (&/|list (&&/|meta exo-type _cursor
-- 
cgit v1.2.3