diff options
Diffstat (limited to 'stdlib/source/test/lux/debug.lux')
| -rw-r--r-- | stdlib/source/test/lux/debug.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/test/lux/debug.lux b/stdlib/source/test/lux/debug.lux index 6332cfa59..1612f17b4 100644 --- a/stdlib/source/test/lux/debug.lux +++ b/stdlib/source/test/lux/debug.lux @@ -78,7 +78,7 @@ [sample_bit random.bit sample_int random.int sample_frac random.frac] - (in (`` (and (case (/.representation (type_literal [Bit Int Frac]) + (in (`` (and (when (/.representation (type_literal [Bit Int Frac]) [sample_bit sample_int sample_frac]) {try.#Success actual} (text#= (format "[" (%.bit sample_bit) @@ -186,7 +186,7 @@ )) ))) (_.coverage [/.cannot_represent_value] - (case (/.representation (-> Nat Nat) (|>>)) + (when (/.representation (-> Nat Nat) (|>>)) {try.#Success representation} false @@ -221,7 +221,7 @@ (def macro_error (syntax (_ [macro <code>.any]) (function (_ compiler) - (case ((expansion.complete macro) compiler) + (when ((expansion.complete macro) compiler) {try.#Failure error} {try.#Success [compiler (list (code.text error))]} |