diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/library/lux/control/exception.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/library/lux/control/exception.lux b/stdlib/source/library/lux/control/exception.lux index bbd25489e..98e0c6f72 100644 --- a/stdlib/source/library/lux/control/exception.lux +++ b/stdlib/source/library/lux/control/exception.lux @@ -76,7 +76,7 @@ {//.#Success []} (..except exception message))) -(def exception +(def exceptionP (Parser [Code (List |type_variable|.Variable) [Text (List |input|.Input)] (Maybe Code)]) (let [private (is (Parser [(List |type_variable|.Variable) [Text (List |input|.Input)] (Maybe Code)]) (all <>.and @@ -90,8 +90,8 @@ (<>.and (<>#in (` .private)) private) ))) -(def .public exception: - (syntax (_ [[export_policy t_vars [name inputs] body] ..exception]) +(def .public exception + (syntax (_ [[export_policy t_vars [name inputs] body] ..exceptionP]) (macro.with_symbols [g!_ g!descriptor] (do meta.monad [current_module meta.current_module_name |