aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/control/parser/text.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/control/parser/text.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux/control/parser/text.lux b/stdlib/source/lux/control/parser/text.lux
index aede52006..ebcf3c53a 100644
--- a/stdlib/source/lux/control/parser/text.lux
+++ b/stdlib/source/lux/control/parser/text.lux
@@ -288,7 +288,7 @@
[(def: #export (<name> parser)
{#.doc (code.text ($_ /\compose "Lex " <doc-modifier> " characters as a single continuous text."))}
(-> (Parser Text) (Parser Text))
- (|> parser <base> (:: //.monad map /.concat)))]
+ (|> parser <base> (\ //.monad map /.concat)))]
[some //.some "some"]
[many //.many "many"]
@@ -308,7 +308,7 @@
[(def: #export (<name> amount parser)
{#.doc (code.text ($_ /\compose "Lex " <doc-modifier> " N characters."))}
(-> Nat (Parser Text) (Parser Text))
- (|> parser (<base> amount) (:: //.monad map /.concat)))]
+ (|> parser (<base> amount) (\ //.monad map /.concat)))]
[exactly //.exactly "exactly"]
[at-most //.at-most "at most"]
@@ -329,7 +329,7 @@
(def: #export (between from to parser)
{#.doc "Lex between N and M characters."}
(-> Nat Nat (Parser Text) (Parser Text))
- (|> parser (//.between from to) (:: //.monad map /.concat)))
+ (|> parser (//.between from to) (\ //.monad map /.concat)))
(def: #export (between! from to parser)
{#.doc "Lex between N and M characters."}