aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux/static.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/test/lux/static.lux')
-rw-r--r--stdlib/source/test/lux/static.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/lux/static.lux b/stdlib/source/test/lux/static.lux
index 048d0511b..d603b4d85 100644
--- a/stdlib/source/test/lux/static.lux
+++ b/stdlib/source/test/lux/static.lux
@@ -31,7 +31,7 @@
<right> (<random>)
<l+r> (<static> (<+> <left> <right>))]
(case (' <l+r>)
- [_ (<tag> l+r)]
+ [_ {<tag> l+r}]
(<=> l+r (<+> <left> <right>))
_
@@ -46,7 +46,7 @@
<right> (/.random_frac)
<l+r> (/.frac (f.+ <left> <right>))]
(case (' <l+r>)
- [_ (#.Frac l+r)]
+ [_ {#.Frac l+r}]
(or (f.= l+r (f.+ <left> <right>))
(and (f.not_a_number? l+r)
(f.not_a_number? (f.+ <left> <right>))
@@ -60,7 +60,7 @@
<right> (/.random code.text (random.ascii/alpha_num 1))
<l+r> (/.text (format <left> <right>))]
(case (' <l+r>)
- [_ (#.Text l+r)]
+ [_ {#.Text l+r}]
(text\= l+r (format <left> <right>))
_
@@ -70,7 +70,7 @@
<right> (/.random code.text (random.ascii/alpha_num 1))
<l+r> (/.literal code.text (format <left> <right>))]
(case (' <l+r>)
- [_ (#.Text l+r)]
+ [_ {#.Text l+r}]
(text\= l+r (format <left> <right>))
_