The language officially has a name: Lux (stylized as "lux").

1 files changed, 10 insertions, 13 deletions

diff --git a/src/lang.clj b/src/lux.clj
index 0777812b7..82fcb3a57 100644
--- a/src/lang.clj
+++ b/src/lux.clj
@@ -1,13 +1,14 @@
-(ns lang
-  (:require (lang [lexer :as &lexer]
-                  [parser :as &parser]
-                  [type :as &type]
-                  [analyser :as &analyser]
-                  [compiler :as &compiler])
+(ns lux
+  (:require (lux [lexer :as &lexer]
+                 [parser :as &parser]
+                 [type :as &type]
+                 [analyser :as &analyser]
+                 [compiler :as &compiler])
             :reload))
 
 (comment
-  ;; TODO: Add macros.
+  ;; TODO: Make macros monadic.
+  ;; TODO: Finish type system.
   ;; TODO: Re-implement compiler in language.
   ;; TODO: Add signatures & structures OR type-classes.
   ;; TODO: Add type-level computations.
@@ -21,12 +22,12 @@
   ;; TODO: When doing partial application, skip "apply" and just call constructor appropiatedly.
   ;; TODO: Add "new". Allow setting fields.
   ;; TODO: Don't take into account newlines in strings unless they come from \n to allow better coding.
-  ;; TODO: 
+  ;; TODO: monitor enter & monitor exit.
   ;; TODO: 
   ;; TODO: 
   ;; TODO: 
 
-  (let [source-code (slurp "test2.lang")
+  (let [source-code (slurp "test2.lux")
         tokens (&lexer/lex source-code)
         ;; _ (prn 'tokens tokens)
         syntax (&parser/parse tokens)
@@ -37,12 +38,8 @@
         class-data (&compiler/compile "test2" syntax)
         ;; _ (prn 'class-data class-data)
         ]
-    ;; (with-open [stream (java.io.BufferedOutputStream. (java.io.FileOutputStream. "test2.class"))]
-    ;;   (.write stream class-data))
     )
 
-  (Class/forName "test2.Variant")
-  
   ;; jar cvf test2.jar *.class test2 && java -cp "test2.jar" test2
   )