- WIP: Implemented more functionality.

- Lots of refactorings.

1 files changed, 3 insertions, 3 deletions

diff --git a/new-luxc/source/luxc/compiler/statement.jvm.lux b/new-luxc/source/luxc/compiler/statement.jvm.lux
index c4c23746e..0e53ba37d 100644
--- a/new-luxc/source/luxc/compiler/statement.jvm.lux
+++ b/new-luxc/source/luxc/compiler/statement.jvm.lux
@@ -11,16 +11,16 @@
         ["&;" env]
         (compiler ["&;" expr])))
 
-(def: (compile-def def-name def-value def-meta)
+(def: #export (compile-def def-name def-value def-meta)
   (-> Text AST AST (Lux Unit))
   (do Monad<Lux>
     [=def-value (&expr;compile def-value)
      =def-meta (&expr;compile def-meta)]
     (undefined)))
 
-(def: (compile-program prog-args prog-body)
+(def: #export (compile-program prog-args prog-body)
   (-> Text AST (Lux Unit))
   (do Monad<Lux>
     [=prog-body (&env;with-local [prog-args (type (List Text))]
-                                 (&expr;compile prog-body))]
+                  (&expr;compile prog-body))]
     (undefined)))