- Moved all translation code under the JVM path (in preparation for porting the JS back-end).

1 files changed, 13 insertions, 9 deletions

diff --git a/new-luxc/source/luxc/lang/translation/expression.jvm.lux b/new-luxc/source/luxc/lang/translation/jvm/expression.jvm.lux
index 4496de784..82c8c0ec0 100644
--- a/new-luxc/source/luxc/lang/translation/expression.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/jvm/expression.jvm.lux
@@ -9,16 +9,17 @@
        (macro ["s" syntax]))
   (luxc ["&" lang]
         (lang [".L" variable #+ Variable Register]
+              [".L" extension]
               (host ["$" jvm])
-              ["ls" synthesis]
-              (translation [".T" common]
-                           [".T" primitive]
-                           [".T" structure]
-                           [".T" eval]
-                           [".T" procedure]
-                           [".T" function]
-                           [".T" reference]
-                           [".T" case]))))
+              ["ls" synthesis]))
+  (// [".T" common]
+      [".T" primitive]
+      [".T" structure]
+      [".T" eval]
+      [".T" function]
+      [".T" reference]
+      [".T" case]
+      [".T" procedure]))
 
 (exception: #export Unrecognized-Synthesis)
 
@@ -70,6 +71,9 @@
 
     (^code ((~ [_ (#.Text procedure)]) (~+ argsS)))
     (procedureT.translate-procedure translate procedure argsS)
+    ## (do macro.Monad<Meta>
+    ##   [translation (extensionL.find-translation procedure)]
+    ##   (translation argsS))
 
     _
     (&.throw Unrecognized-Synthesis (%code synthesis))