aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux/control/concurrency/actor.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/test/lux/control/concurrency/actor.lux14
1 files changed, 6 insertions, 8 deletions
diff --git a/stdlib/source/test/lux/control/concurrency/actor.lux b/stdlib/source/test/lux/control/concurrency/actor.lux
index b2603fc0d..7616ea1a9 100644
--- a/stdlib/source/test/lux/control/concurrency/actor.lux
+++ b/stdlib/source/test/lux/control/concurrency/actor.lux
@@ -28,17 +28,15 @@
(exception: got_wrecked)
(actor: counter
- {}
-
Nat
- ((on_mail message state self)
- (message state self))
+ [((on_mail message state self)
+ (message state self))
- (message: (count! {increment Nat} state self)
- Nat
- (let [state' (n.+ increment state)]
- (async\in (#try.Success [state' state']))))
+ (message: (count! {increment Nat} state self)
+ Nat
+ (let [state' (n.+ increment state)]
+ (async\in (#try.Success [state' state']))))]
)
(def: (mailed? outcome)