diff options
| author | Eduardo Julian | 2019-04-16 18:47:13 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2019-04-16 18:47:13 -0400 |
| commit | 42248854f0cb5e3364e6aae25527cee65cbda3e8 (patch) | |
| tree | c0a8c65fb8dc11d85cca22fe03182f39bf22ef1a /luxc | |
| parent | afddac31e065ae1df0c7c78cc2ce6d13b01896c6 (diff) | |
The old compiler is now identified with "old" instead of "jvm". This should help to get old JVM code and new JVM code to coexist without forcing a major rewrite of old compiler code to get it to fit the style of the new JVM compiler code.
Diffstat (limited to 'luxc')
| -rw-r--r-- | luxc/src/lux/compiler/io.clj | 2 | ||||
| -rw-r--r-- | luxc/src/lux/compiler/jvm.clj | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/luxc/src/lux/compiler/io.clj b/luxc/src/lux/compiler/io.clj index 46a3fdfd7..8820bfb05 100644 --- a/luxc/src/lux/compiler/io.clj +++ b/luxc/src/lux/compiler/io.clj @@ -13,7 +13,7 @@ (defn read-file [source-dirs module-name] (|do [jvm? &/jvm? js? &/js? - :let [^String host-file-name (cond jvm? (str module-name ".jvm.lux") + :let [^String host-file-name (cond jvm? (str module-name ".old.lux") js? (str module-name ".js.lux") :else (assert false "[I/O Error] Unknown host platform.")) ^String lux-file-name (str module-name ".lux")]] diff --git a/luxc/src/lux/compiler/jvm.clj b/luxc/src/lux/compiler/jvm.clj index 8e2966b52..b5e04792a 100644 --- a/luxc/src/lux/compiler/jvm.clj +++ b/luxc/src/lux/compiler/jvm.clj @@ -249,7 +249,7 @@ &&jvm-cache/uninstall-all-defs-in-module) _ (compile-module source-dirs "lux")] (compile-module source-dirs program-module))] - (|case (m-action (&/init-state "JVM" mode (jvm-host))) + (|case (m-action (&/init-state "{old}" mode (jvm-host))) (&/$Right ?state _) (do (println "Compilation complete!") (&&cache/clean ?state)) |