aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/tool/compiler/reference/variable.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/library/lux/tool/compiler/reference/variable.lux8
1 files changed, 5 insertions, 3 deletions
diff --git a/stdlib/source/library/lux/tool/compiler/reference/variable.lux b/stdlib/source/library/lux/tool/compiler/reference/variable.lux
index 0614c5b30..a9d4f432e 100644
--- a/stdlib/source/library/lux/tool/compiler/reference/variable.lux
+++ b/stdlib/source/library/lux/tool/compiler/reference/variable.lux
@@ -9,6 +9,8 @@
[data
[text
["%" format {"+" Format}]]]
+ [macro
+ ["^" pattern]]
[math
[number
["n" nat]
@@ -27,7 +29,7 @@
(def: (= reference sample)
(case [reference sample]
- (^template [<tag>]
+ (^.template [<tag>]
[[{<tag> reference'} {<tag> sample'}]
(n.= reference' sample')])
([#Local] [#Foreign])
@@ -43,7 +45,7 @@
(def: hash
(|>> (pipe.case
- (^template [<factor> <tag>]
+ (^.template [<factor> <tag>]
[{<tag> register}
(|> register
(# n.hash hash)
@@ -57,7 +59,7 @@
(def: .public self?
(-> Variable Bit)
(|>> (pipe.case
- (^ (..self))
+ (pattern (..self))
true
_