diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/data/text/regex.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux/data/text/regex.lux b/stdlib/source/lux/data/text/regex.lux index 1063fdb71..7c8395d71 100644 --- a/stdlib/source/lux/data/text/regex.lux +++ b/stdlib/source/lux/data/text/regex.lux @@ -82,7 +82,7 @@ (def: re-range^ (Parser Code) - (do p.monad + (do {@ p.monad} [from (|> regex-char^ (:: @ map (|>> (//.nth 0) maybe.assume))) _ (l.this "-") to (|> regex-char^ (:: @ map (|>> (//.nth 0) maybe.assume)))] @@ -228,7 +228,7 @@ (def: (re-counted-quantified^ current-module) (-> Text (Parser Code)) - (do p.monad + (do {@ p.monad} [base (re-simple^ current-module)] (l.enclosed ["{" "}"] ($_ p.either @@ -458,7 +458,7 @@ (regex "a|b") (regex "a(.)(.)|b(.)(.)") )} - (do @ + (do macro.monad [current-module macro.current-module-name] (case (l.run (p.before l.end (regex^ current-module)) |