aboutsummaryrefslogtreecommitdiff
path: root/lux-python
diff options
context:
space:
mode:
authorEduardo Julian2022-03-30 14:05:57 -0400
committerEduardo Julian2022-03-30 14:05:57 -0400
commit381ec5920d9ebeb335963778dec182268819e718 (patch)
tree5c9288c5fbb16c21a0f00f96710b0aa7db4585f4 /lux-python
parent1a962ee4b03f51f46a5979bfefc954f35ee3a1b7 (diff)
Now demanding mandatory loop names, instead of using default "again" name.
Diffstat (limited to 'lux-python')
-rw-r--r--lux-python/source/program.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/lux-python/source/program.lux b/lux-python/source/program.lux
index d6dc27186..6f145bbbd 100644
--- a/lux-python/source/program.lux
+++ b/lux-python/source/program.lux
@@ -149,9 +149,9 @@
(def: (read_tuple read host_object)
(-> Translator Translator)
(let [size (|> host_object org/python/core/PyObject::__len__ ffi.of_int .nat)]
- (loop [idx 0
- output (as (Array Any)
- (array.empty size))]
+ (loop (again [idx 0
+ output (as (Array Any)
+ (array.empty size))])
(if (n.< size idx)
(case (org/python/core/PyObject::__getitem__ (ffi.as_int (.int idx)) host_object)
{try.#Success value}
@@ -267,8 +267,8 @@
(try.trusted
(do [! try.monad]
[inputs (monad.each ! ..read (array.list {.#None} inputs))]
- (in (loop [it it
- inputs inputs]
+ (in (loop (again [it it
+ inputs inputs])
(`` (`` (case inputs
(pattern (list))
(as org/python/core/PyObject self)