aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/control/parser/xml.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/library/lux/control/parser/xml.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/library/lux/control/parser/xml.lux b/stdlib/source/library/lux/control/parser/xml.lux
index 0fc4ab793..780a0b18f 100644
--- a/stdlib/source/library/lux/control/parser/xml.lux
+++ b/stdlib/source/library/lux/control/parser/xml.lux
@@ -128,7 +128,7 @@
(def: .public (somewhere parser)
(All (_ a) (-> (Parser a) (Parser a)))
- (function (recur [attrs input])
+ (function (again [attrs input])
(case (//.result parser [attrs input])
{try.#Success [[attrs remaining] output]}
{try.#Success [[attrs remaining] output]}
@@ -140,6 +140,6 @@
{.#Item head tail}
(do try.monad
- [[[attrs tail'] output] (recur [attrs tail])]
+ [[[attrs tail'] output] (again [attrs tail])]
(in [[attrs {.#Item head tail'}]
output]))))))