diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/library/lux/control/parser/type.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/library/lux/control/parser/type.lux b/stdlib/source/library/lux/control/parser/type.lux index 9546c128f..b4609b897 100644 --- a/stdlib/source/library/lux/control/parser/type.lux +++ b/stdlib/source/library/lux/control/parser/type.lux @@ -5,7 +5,7 @@ ["[0]" monad (.only do)]] [control ["[0]" try (.only Try)] - ["[0]" exception (.only exception:)] + ["[0]" exception (.only exception)] ["[0]" function]] [data ["[0]" text (.use "[1]#[0]" monoid) @@ -28,7 +28,7 @@ [{.#Primitive "" {.#End}}])) (with_template [<name>] - [(exception: .public (<name> [type Type]) + [(exception .public (<name> [type Type]) (exception.report "Type" (%.type type)))] @@ -45,8 +45,8 @@ ) (with_template [<name>] - [(exception: .public (<name> [expected Type - actual Type]) + [(exception .public (<name> [expected Type + actual Type]) (exception.report "Expected" (%.type expected) "Actual" (%.type actual)))] @@ -55,9 +55,9 @@ [wrong_parameter] ) -(exception: .public empty_input) +(exception .public empty_input) -(exception: .public (unconsumed_input [remaining (List Type)]) +(exception .public (unconsumed_input [remaining (List Type)]) (exception.report "Types" (|> remaining (list#each (|>> %.type (format text.new_line "* "))) |