aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/control/parser/text.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/library/lux/control/parser/text.lux18
1 files changed, 9 insertions, 9 deletions
diff --git a/stdlib/source/library/lux/control/parser/text.lux b/stdlib/source/library/lux/control/parser/text.lux
index 4767ef744..239ddf3bc 100644
--- a/stdlib/source/library/lux/control/parser/text.lux
+++ b/stdlib/source/library/lux/control/parser/text.lux
@@ -43,15 +43,15 @@
(exception: .public (unconsumed_input [offset Offset
tape Text])
(exception.report
- ["Offset" (n#encoded offset)]
- ["Input size" (n#encoded (/.size tape))]
- ["Remaining input" (..left_over offset tape)]))
+ "Offset" (n#encoded offset)
+ "Input size" (n#encoded (/.size tape))
+ "Remaining input" (..left_over offset tape)))
(exception: .public (expected_to_fail [offset Offset
tape Text])
(exception.report
- ["Offset" (n#encoded offset)]
- ["Input" (..left_over offset tape)]))
+ "Offset" (n#encoded offset)
+ "Input" (..left_over offset tape)))
(exception: .public cannot_parse)
(exception: .public cannot_slice)
@@ -123,7 +123,7 @@
(exception: .public (cannot_match [reference Text])
(exception.report
- ["Reference" (/.format reference)]))
+ "Reference" (/.format reference)))
(def: .public (this reference)
(-> Text (Parser Any))
@@ -200,8 +200,8 @@
[(exception: .public (<name> [options Text
character Char])
(exception.report
- ["Options" (/.format options)]
- ["Character" (/.format (/.of_char character))]))]
+ "Options" (/.format options)
+ "Character" (/.format (/.of_char character))))]
[character_should_be]
[character_should_not_be]
@@ -247,7 +247,7 @@
(exception: .public (character_does_not_satisfy_predicate [character Char])
(exception.report
- ["Character" (/.format (/.of_char character))]))
+ "Character" (/.format (/.of_char character))))
(def: .public (satisfies parser)
(-> (-> Char Bit) (Parser Text))