diff options
Diffstat (limited to 'new-luxc/source/luxc')
| -rw-r--r-- | new-luxc/source/luxc/base.lux | 5 | ||||
| -rw-r--r-- | new-luxc/source/luxc/compiler.lux | 6 |
2 files changed, 6 insertions, 5 deletions
diff --git a/new-luxc/source/luxc/base.lux b/new-luxc/source/luxc/base.lux index 8660d7ccf..bc05afea4 100644 --- a/new-luxc/source/luxc/base.lux +++ b/new-luxc/source/luxc/base.lux @@ -10,8 +10,9 @@ (type: #export Path Text) (type: #export Mode - #Release - #Debug) + #Build + #Eval + #REPL) (def: #export (fail message) (All [a] (-> Text (Lux a))) diff --git a/new-luxc/source/luxc/compiler.lux b/new-luxc/source/luxc/compiler.lux index 12966ba00..67a9928fd 100644 --- a/new-luxc/source/luxc/compiler.lux +++ b/new-luxc/source/luxc/compiler.lux @@ -118,7 +118,7 @@ (def: init-compiler-info Compiler-Info {#;compiler-version compiler-version - #;compiler-mode #;Release}) + #;compiler-mode #;Build}) (def: (init-compiler host) (-> Host Compiler) @@ -144,8 +144,8 @@ (#E;Success output) (wrap output)))) -(def: #export (compile-program mode program target sources) - (-> &;Mode &;Path &;Path (List &;Path) (P;Promise Unit)) +(def: #export (compile-program program target sources) + (-> &;Path &;Path (List &;Path) (P;Promise Unit)) (do P;Monad<Promise> [#let [compiler (init-compiler init-host)] _ (or-crash! (&&runtime;compile-runtime [])) |