3 files changed, 5 insertions, 5 deletions
diff --git a/new-luxc/source/luxc/compiler.lux b/new-luxc/source/luxc/compiler.lux
index 67a9928fd..8d0ea8a2f 100644
--- a/new-luxc/source/luxc/compiler.lux
+++ b/new-luxc/source/luxc/compiler.lux
@@ -15,7 +15,7 @@
         ))
 
 (def: (compile ast)
-  (-> AST (Lux Unit))
+  (-> Code (Lux Unit))
   (case ast
     (^ [_ (#;Form (list [_ (#;Symbol ["" "_lux_def"])]
                         [_ (#;Symbol ["" def-name])]
@@ -61,7 +61,7 @@
     (wrap output)))
 
 (def: parse
-  (Lux AST)
+  (Lux Code)
   (function [compiler]
     (case (&parser;parse (get@ #;source compiler))
       (#E;Error error)
diff --git a/new-luxc/source/luxc/compiler/expr.jvm.lux b/new-luxc/source/luxc/compiler/expr.jvm.lux
index 138d0d540..f0508c0d2 100644
--- a/new-luxc/source/luxc/compiler/expr.jvm.lux
+++ b/new-luxc/source/luxc/compiler/expr.jvm.lux
@@ -23,7 +23,7 @@
   (undefined))
 
 (def: #export (compile input)
-  (-> AST (Lux Compiled))
+  (-> Code (Lux Compiled))
   (|> input
       (&analyser;analyse eval)
       (Lux/map &synthesizer;synthesize)
diff --git a/new-luxc/source/luxc/compiler/statement.jvm.lux b/new-luxc/source/luxc/compiler/statement.jvm.lux
index 0e53ba37d..7e48d061f 100644
--- a/new-luxc/source/luxc/compiler/statement.jvm.lux
+++ b/new-luxc/source/luxc/compiler/statement.jvm.lux
@@ -12,14 +12,14 @@
         (compiler ["&;" expr])))
 
 (def: #export (compile-def def-name def-value def-meta)
-  (-> Text AST AST (Lux Unit))
+  (-> 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 AST (Lux Unit))
+  (-> Text Code (Lux Unit))
   (do Monad<Lux>
     [=prog-body (&env;with-local [prog-args (type (List Text))]
                   (&expr;compile prog-body))]