From 3175ae85d62ff6f692b8cc127f56c6569041d788 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 1 May 2017 18:15:14 -0400
Subject: - WIP: Some initial implementations for some re-written
 infrastructure.

---
 new-luxc/source/luxc/compiler/expr.jvm.lux | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100644 new-luxc/source/luxc/compiler/expr.jvm.lux

(limited to 'new-luxc/source/luxc/compiler/expr.jvm.lux')

diff --git a/new-luxc/source/luxc/compiler/expr.jvm.lux b/new-luxc/source/luxc/compiler/expr.jvm.lux
new file mode 100644
index 000000000..6655abd5f
--- /dev/null
+++ b/new-luxc/source/luxc/compiler/expr.jvm.lux
@@ -0,0 +1,27 @@
+(;module:
+  lux
+  (lux (control monad)
+       (data text/format)
+       [macro #+ Monad<Lux>])
+  (luxc ["&" base]
+        ["&;" module]
+        ["&;" env]
+        ["&;" analyser]
+        ["&;" synthesizer #+ Synthesis]))
+
+(type: #export JVM-Bytecode
+  Void)
+
+(type: Compiled
+  JVM-Bytecode)
+
+(def: (compile-synthesis synthesis)
+  (-> Synthesis Compiled)
+  (undefined))
+
+(def: #export (compile input)
+  (-> AST (Lux Compiled))
+  (|> input
+      &analyser;analyse
+      (Lux/map &synthesizer;synthesize)
+      (Lux/map compile-synthesis)))
-- 
cgit v1.2.3