diff options
Diffstat (limited to 'stdlib/source/test/lux/meta/static.lux')
| -rw-r--r-- | stdlib/source/test/lux/meta/static.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/lux/meta/static.lux b/stdlib/source/test/lux/meta/static.lux index e030d74ac..a7169d6af 100644 --- a/stdlib/source/test/lux/meta/static.lux +++ b/stdlib/source/test/lux/meta/static.lux @@ -32,7 +32,7 @@ (with_expansions [<left> (<random>) <right> (<random>) <l+r> (<static> (<+> <left> <right>))] - (case (' <l+r>) + (when (' <l+r>) [_ {<tag> l+r}] (<=> l+r (<+> <left> <right>)) @@ -47,7 +47,7 @@ (with_expansions [<left> (/.random_frac) <right> (/.random_frac) <l+r> (/.frac (f.+ <left> <right>))] - (case (' <l+r>) + (when (' <l+r>) [_ {.#Frac l+r}] (or (f.= l+r (f.+ <left> <right>)) (and (f.not_a_number? l+r) @@ -61,7 +61,7 @@ (with_expansions [<left> (/.random code.text (random.alpha_numeric 1)) <right> (/.random code.text (random.alpha_numeric 1)) <l+r> (/.text (format <left> <right>))] - (case (' <l+r>) + (when (' <l+r>) [_ {.#Text l+r}] (text#= l+r (format <left> <right>)) @@ -78,7 +78,7 @@ (with_expansions [<left> (/.random code.text (random.alpha_numeric 1)) <right> (/.random code.text (random.alpha_numeric 1)) <l+r> (/.literal code.text (format <left> <right>))] - (case (' <l+r>) + (when (' <l+r>) [_ {.#Text l+r}] (text#= l+r (format <left> <right>)) |