diff options
Diffstat (limited to 'new-luxc/source/luxc/compiler/statement.jvm.lux')
-rw-r--r-- | new-luxc/source/luxc/compiler/statement.jvm.lux | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/new-luxc/source/luxc/compiler/statement.jvm.lux b/new-luxc/source/luxc/compiler/statement.jvm.lux deleted file mode 100644 index 96263181f..000000000 --- a/new-luxc/source/luxc/compiler/statement.jvm.lux +++ /dev/null @@ -1,25 +0,0 @@ -(;module: - lux - (lux (control monad) - [io #- run] - (data [text "T/" Eq<Text>] - text/format) - [macro #+ Monad<Lux>]) - (luxc ["&" base] - ["&;" module] - ["&;" env] - (compiler ["&;" expr]))) - -(def: #export (compile-def def-name def-value def-meta) - (-> Text Code Code (Lux Unit)) - (do Monad<Lux> - [=def-value (&expr;compile def-value) - =def-meta (&expr;compile def-meta)] - (undefined))) - -(def: #export (compile-program prog-args prog-body) - (-> Text Code (Lux Unit)) - (do Monad<Lux> - [=prog-body (&env;with-local [prog-args (type (List Text))] - (&expr;compile prog-body))] - (undefined))) |