aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/compositor.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/program/compositor.lux
parent1a962ee4b03f51f46a5979bfefc954f35ee3a1b7 (diff)
Now demanding mandatory loop names, instead of using default "again" name.
Diffstat (limited to 'stdlib/source/program/compositor.lux')
-rw-r--r--stdlib/source/program/compositor.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux
index a6e31ec08..aaf9e27f4 100644
--- a/stdlib/source/program/compositor.lux
+++ b/stdlib/source/program/compositor.lux
@@ -116,9 +116,9 @@
(-> (file.System Async) (List file.Path) (Async (Try (Dictionary file.Path Binary))))
(do [! (try.with async.monad)]
[]
- (loop [pending host_dependencies
- output (is (Dictionary file.Path Binary)
- (dictionary.empty text.hash))]
+ (loop (again [pending host_dependencies
+ output (is (Dictionary file.Path Binary)
+ (dictionary.empty text.hash))])
(case pending
{.#End}
(in output)