diff options
Diffstat (limited to '')
-rw-r--r-- | src/lux.clj (renamed from src/lang.clj) | 23 |
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 ) |