diff options
Diffstat (limited to 'stdlib/source/library/lux/macro/context.lux')
-rw-r--r-- | stdlib/source/library/lux/macro/context.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/library/lux/macro/context.lux b/stdlib/source/library/lux/macro/context.lux index ae958a606..fef8ae1d8 100644 --- a/stdlib/source/library/lux/macro/context.lux +++ b/stdlib/source/library/lux/macro/context.lux @@ -5,7 +5,7 @@ [monad (.only do)] ["[0]" predicate (.only Predicate)]] [control - ["[0]" exception (.only exception:)] + ["[0]" exception (.only exception)] ["[0]" maybe] ["?" parser (.only) ["?[0]" code]]] @@ -25,7 +25,7 @@ (type .public Stack List) -(exception: .public (no_definition [it Symbol]) +(exception .public (no_definition [it Symbol]) (exception.report "Definition" (symbol#encoded it))) @@ -45,7 +45,7 @@ {.#None} (meta.failure (exception.error ..no_definition [it]))))) -(exception: .public no_active_context) +(exception .public no_active_context) (.def (peek' _ context) (All (_ a) (-> (Stack a) Symbol (Meta a))) @@ -64,7 +64,7 @@ (syntax (_ [g!it (at ?.monad each code.symbol ?code.global)]) (in (list (` ((~! ..peek') (~ g!it) (.symbol (~ g!it)))))))) -(exception: .public no_example) +(exception .public no_example) (.def (search' _ ? context) (All (_ a) (-> (Stack a) (Predicate a) Symbol (Meta a))) |