aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-03-30 14:05:57 -0400
committerEduardo Julian2022-03-30 14:05:57 -0400
commit381ec5920d9ebeb335963778dec182268819e718 (patch)
tree5c9288c5fbb16c21a0f00f96710b0aa7db4585f4 /stdlib/source/test/lux.lux
parent1a962ee4b03f51f46a5979bfefc954f35ee3a1b7 (diff)
Now demanding mandatory loop names, instead of using default "again" name.
Diffstat (limited to 'stdlib/source/test/lux.lux')
-rw-r--r--stdlib/source/test/lux.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index d7a2ac3eb..9e52c5465 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -387,8 +387,8 @@
{.#Right [lux (list (code.bit (text.contains? ..crosshair source_code)))]}))
(/.macro: (sum tokens)
- (loop [tokens tokens
- output 0]
+ (loop (again [tokens tokens
+ output 0])
(case tokens
{.#End}
(meta#in (list (code.nat output)))
@@ -1033,8 +1033,8 @@
.let [expected (n.* factor iterations)]]
(_.cover [/.loop]
(n.= expected
- (/.loop [counter 0
- value 0]
+ (/.loop (again [counter 0
+ value 0])
(if (n.< iterations counter)
(again (++ counter) (n.+ factor value))
value)))))