diff options
Diffstat (limited to 'new-luxc/source/luxc/repl.lux')
-rw-r--r-- | new-luxc/source/luxc/repl.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/new-luxc/source/luxc/repl.lux b/new-luxc/source/luxc/repl.lux index cdc61ab22..fbf1a336e 100644 --- a/new-luxc/source/luxc/repl.lux +++ b/new-luxc/source/luxc/repl.lux @@ -55,7 +55,7 @@ (def: no-aliases Aliases (dict.new text.Hash<Text>)) (def: (initialize source-dirs target-dir console) - (-> (List File) File Console (Task Compiler)) + (-> (List File) File Console (Task Lux)) (do promise.Monad<Promise> [output (promise.future (do io.Monad<IO> @@ -200,7 +200,7 @@ (recur tail variantV))))))))) (def: (tagged-representation compiler representation) - (-> Compiler (Poly Representation) (Poly Representation)) + (-> Lux (Poly Representation) (Poly Representation)) (do p.Monad<Parser> [[name anonymous] poly.named] (case (macro.run compiler (macro.tags-of name)) @@ -237,7 +237,7 @@ (format "[" tuple-body "]")))))) (def: (representation compiler) - (-> Compiler (Poly Representation)) + (-> Lux (Poly Representation)) (p.rec (function (_ representation) ($_ p.either @@ -263,7 +263,7 @@ )))) (def: (represent compiler type value) - (-> Compiler Type Top Text) + (-> Lux Type Top Text) (case (poly.run type (representation compiler)) (#e.Success representation) (representation value) |