aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/world/file/watch.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/world/file/watch.lux')
-rw-r--r--stdlib/source/library/lux/world/file/watch.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/library/lux/world/file/watch.lux b/stdlib/source/library/lux/world/file/watch.lux
index 4266f170c..eca972ca5 100644
--- a/stdlib/source/library/lux/world/file/watch.lux
+++ b/stdlib/source/library/lux/world/file/watch.lux
@@ -276,8 +276,8 @@
(def: (default_list list)
(All (_ a) (-> (java/util/List a) (List a)))
(let [size (.nat (ffi.of_int (java/util/List::size list)))]
- (loop [idx 0
- output {.#End}]
+ (loop (again [idx 0
+ output {.#End}])
(if (n.< size idx)
(again (++ idx)
{.#Item (java/util/List::get (ffi.as_int (.int idx)) list)
@@ -374,8 +374,8 @@
(def: (default_poll watcher)
(-> java/nio/file/WatchService (IO (Try (List [Concern //.Path]))))
- (loop [output (is (List [Concern //.Path])
- (list))]
+ (loop (again [output (is (List [Concern //.Path])
+ (list))])
(do (try.with io.monad)
[?key (java/nio/file/WatchService::poll watcher)]
(case ?key