diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/test/lux/meta/code.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/lux/meta/code.lux b/stdlib/source/test/lux/meta/code.lux index 80c1bbe65..7e35b1c9f 100644 --- a/stdlib/source/test/lux/meta/code.lux +++ b/stdlib/source/test/lux/meta/code.lux @@ -39,7 +39,7 @@ (def !expect (template (_ <pattern> <value>) - [(case <value> + [(when <value> <pattern> true @@ -207,7 +207,7 @@ (text.size source_code)) start (is Source [location.dummy 0 source_code])] - (case (parse start) + (when (parse start) {.#Left [end error]} {try.#Failure error} @@ -250,7 +250,7 @@ [(do [! random.monad] [expected <random>] (_.coverage [<coverage>] - (and (case (..read (/.format (<coverage> expected))) + (and (when (..read (/.format (<coverage> expected))) {try.#Success actual} (at /.equivalence = actual @@ -276,7 +276,7 @@ [(do [! random.monad] [expected <random>] (_.coverage [<coverage>] - (and (case (..read (/.format (<coverage> expected))) + (and (when (..read (/.format (<coverage> expected))) {try.#Success actual} (at /.equivalence = actual |