aboutsummaryrefslogtreecommitdiff
path: root/stdlib
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/concurrency/actor.lux4
1 files changed, 3 insertions, 1 deletions
diff --git a/stdlib/source/lux/concurrency/actor.lux b/stdlib/source/lux/concurrency/actor.lux
index 91e4f7a4a..93f1ed6d8 100644
--- a/stdlib/source/lux/concurrency/actor.lux
+++ b/stdlib/source/lux/concurrency/actor.lux
@@ -325,7 +325,9 @@
(do P;Monad<Promise>
[(~ g!return) (: (T;Task [((~ g!type) (~@ g!refs))
(~ g!outputT)])
- (~ body))]
+ (do T;Monad<Task>
+ []
+ (~ body)))]
(case (~ g!return)
(#;Right [(~ g!state) (~ g!return)])
(exec (io;run (P;resolve (#;Right (~ g!return)) (~ g!task)))