From d2a4aac2226b5cca59be236d3228fe5e5b17b8de Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 14 Sep 2015 23:37:10 -0400
Subject: - Renamed "this" to "_jvm_this". - Movied lux/data/io to
 lux/codata/io.

---
 src/lux/analyser/base.clj | 2 ++
 src/lux/analyser/host.clj | 2 +-
 src/lux/analyser/lux.clj  | 7 +++----
 3 files changed, 6 insertions(+), 5 deletions(-)

(limited to 'src')

diff --git a/src/lux/analyser/base.clj b/src/lux/analyser/base.clj
index 8df7f23b2..b12425ac7 100644
--- a/src/lux/analyser/base.clj
+++ b/src/lux/analyser/base.clj
@@ -155,6 +155,8 @@
   (|let [[_ type] syntax+]
     type))
 
+(def jvm-this "_jvm_this")
+
 (defn cap-1 [action]
   (|do [result action]
     (|case result
diff --git a/src/lux/analyser/host.clj b/src/lux/analyser/host.clj
index f6963d8bf..681f22168 100644
--- a/src/lux/analyser/host.clj
+++ b/src/lux/analyser/host.clj
@@ -411,7 +411,7 @@
                                (if (= "void" method-output)
                                  (&&/analyse-1+ analyse method-body)
                                  (&&/analyse-1 analyse (&type/Data$ (as-otype method-output) &/Nil$) method-body))
-                               (&/|reverse (&/Cons$ (&/T "this" owner-class)
+                               (&/|reverse (&/Cons$ (&/T &&/jvm-this owner-class)
                                                     =method-inputs)))]
       (return {:name method-name
                :modifiers =method-modifiers
diff --git a/src/lux/analyser/lux.clj b/src/lux/analyser/lux.clj
index 3de4db89f..6546990e6 100644
--- a/src/lux/analyser/lux.clj
+++ b/src/lux/analyser/lux.clj
@@ -275,10 +275,9 @@
                                              endo-type))))
                      state)
 
-                    [_]
-                    (do ;; (prn 'analyse-symbol/_2.1.2 ?module name name)
-                        (fail* "[Analyser Error] Can't have anything other than a global def in the global environment."))))
-              (fail* "_{_ analyse-symbol _}_")))
+                    _
+                    (fail* "[Analyser Error] Can't have anything other than a global def in the global environment.")))
+              (fail* "")))
         
         (&/$Cons top-outer _)
         (do ;; (prn 'analyse-symbol/_3 ?module name)
-- 
cgit v1.2.3