diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/lux/macro.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/lux/macro.lux b/stdlib/source/lux/macro.lux index 9b2b5fac8..1328fc034 100644 --- a/stdlib/source/lux/macro.lux +++ b/stdlib/source/lux/macro.lux @@ -14,7 +14,7 @@ (/ [code])) ## (type: (Meta a) -## (-> Compiler (e.Error [Compiler a]))) +## (-> Lux (e.Error [Lux a]))) (struct: #export _ (Functor Meta) (def: (map f fa) @@ -72,11 +72,11 @@ (get k plist')))) (def: #export (run' compiler action) - (All [a] (-> Compiler (Meta a) (e.Error [Compiler a]))) + (All [a] (-> Lux (Meta a) (e.Error [Lux a]))) (action compiler)) (def: #export (run compiler action) - (All [a] (-> Compiler (Meta a) (e.Error a))) + (All [a] (-> Lux (Meta a) (e.Error a))) (case (action compiler) (#e.Error error) (#e.Error error) @@ -531,7 +531,7 @@ (find-def-type name)))) (def: #export (find-type-def name) - {#.doc "Finds the value of a type definition (such as Int, Top or Compiler)."} + {#.doc "Finds the value of a type definition (such as Int, Top or Lux)."} (-> Ident (Meta Type)) (do Monad<Meta> [[def-type def-data def-value] (find-def name)] @@ -660,7 +660,7 @@ (def: #export get-compiler {#.doc "Obtains the current state of the compiler."} - (Meta Compiler) + (Meta Lux) (function (_ compiler) (#e.Success [compiler compiler]))) |