aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux/control/concurrency/async.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-08-11 04:15:07 -0400
committerEduardo Julian2022-08-11 04:15:07 -0400
commit065e8a4d8122d4616b570496915d2c0e2c78cd6b (patch)
treef2bbdc3e40b796b34026ab04c9a478d8a3f082d5 /stdlib/source/test/lux/control/concurrency/async.lux
parent68d78235694c633c956bb9e8a007cad7d65370bc (diff)
Re-named the "case" macro to "when".
Diffstat (limited to 'stdlib/source/test/lux/control/concurrency/async.lux')
-rw-r--r--stdlib/source/test/lux/control/concurrency/async.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/lux/control/concurrency/async.lux b/stdlib/source/test/lux/control/concurrency/async.lux
index 5ca8704ff..36aba9dfd 100644
--- a/stdlib/source/test/lux/control/concurrency/async.lux
+++ b/stdlib/source/test/lux/control/concurrency/async.lux
@@ -40,7 +40,7 @@
(do io.monad
[?left (/.value left)
?right (/.value right)]
- (in (case [?left ?right]
+ (in (when [?left ?right]
[{.#Some left}
{.#Some right}]
(== left right)
@@ -121,7 +121,7 @@
?right (/.or (/.after waiting_time dummy)
(in rightE))]
(unit.coverage [/.or]
- (case [?left ?right]
+ (when [?left ?right]
[{.#Left leftA} {.#Right rightA}]
(n.= (n.+ leftE rightE)
(n.+ leftA rightA))
@@ -142,7 +142,7 @@
(/.async []))]
?never (/.future (/.value async))]
(unit.coverage [/.value]
- (case [?actual ?never]
+ (when [?actual ?never]
[{.#Some actual} {.#None}]
(n.= expected actual)
@@ -160,7 +160,7 @@
[?none (/.within 0 (/.after waiting_time dummy))
?actual (/.within waiting_time (in expected))]
(unit.coverage [/.within]
- (case [?none ?actual]
+ (when [?none ?actual]
[{.#None} {.#Some actual}]
(n.= expected actual)