diff options
author | Eduardo Julian | 2022-03-30 14:05:57 -0400 |
---|---|---|
committer | Eduardo Julian | 2022-03-30 14:05:57 -0400 |
commit | 381ec5920d9ebeb335963778dec182268819e718 (patch) | |
tree | 5c9288c5fbb16c21a0f00f96710b0aa7db4585f4 /lux-python/source | |
parent | 1a962ee4b03f51f46a5979bfefc954f35ee3a1b7 (diff) |
Now demanding mandatory loop names, instead of using default "again" name.
Diffstat (limited to 'lux-python/source')
-rw-r--r-- | lux-python/source/program.lux | 10 |
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) |