aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/control/parser/xml.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/control/parser/xml.lux')
-rw-r--r--stdlib/source/library/lux/control/parser/xml.lux8
1 files changed, 5 insertions, 3 deletions
diff --git a/stdlib/source/library/lux/control/parser/xml.lux b/stdlib/source/library/lux/control/parser/xml.lux
index 55d18cab2..a54e68170 100644
--- a/stdlib/source/library/lux/control/parser/xml.lux
+++ b/stdlib/source/library/lux/control/parser/xml.lux
@@ -23,17 +23,19 @@
(exception: .public empty_input)
(exception: .public unexpected_input)
-(exception: .public (wrong_tag {expected Tag} {actual Tag})
+(exception: .public (wrong_tag [expected Tag
+ actual Tag])
(exception.report
["Expected" (%.text (/.tag expected))]
["Actual" (%.text (/.tag actual))]))
-(exception: .public (unknown_attribute {expected Attribute} {available (List Attribute)})
+(exception: .public (unknown_attribute [expected Attribute
+ available (List Attribute)])
(exception.report
["Expected" (%.text (/.attribute expected))]
["Available" (exception.listing (|>> /.attribute %.text) available)]))
-(exception: .public (unconsumed_inputs {inputs (List XML)})
+(exception: .public (unconsumed_inputs [inputs (List XML)])
(exception.report
["Inputs" (exception.listing (\ /.codec encoded) inputs)]))