aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/tool/compiler/phase/generation/reference.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/tool/compiler/phase/generation/reference.lux')
-rw-r--r--stdlib/source/lux/tool/compiler/phase/generation/reference.lux14
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/lux/tool/compiler/phase/generation/reference.lux b/stdlib/source/lux/tool/compiler/phase/generation/reference.lux
index 878d96e83..f8c875ccc 100644
--- a/stdlib/source/lux/tool/compiler/phase/generation/reference.lux
+++ b/stdlib/source/lux/tool/compiler/phase/generation/reference.lux
@@ -7,10 +7,10 @@
format]]
[type (#+ :share)]]
["." //
- ["/." // ("#/." monad)
- [//
+ ["#/" // ("#/." monad)
+ ["#/" // #_
[synthesis (#+ Synthesis)]
- ["." reference (#+ Register Variable Reference)]]]])
+ ["#." reference (#+ Register Variable Reference)]]]])
(signature: #export (System expression)
(: (-> Register expression)
@@ -56,10 +56,10 @@
variable}
{(All [anchor statement]
(-> Variable (//.Operation anchor expression statement)))
- (|>> (case> (#reference.Local register)
+ (|>> (case> (#////reference.Local register)
(local register)
- (#reference.Foreign register)
+ (#////reference.Foreign register)
(foreign register))
////wrap)})
constant (:share [expression]
@@ -74,8 +74,8 @@
(def: variable variable)
(def: constant constant)
(def: reference
- (|>> (case> (#reference.Constant value)
+ (|>> (case> (#////reference.Constant value)
(constant value)
- (#reference.Variable value)
+ (#////reference.Variable value)
(variable value)))))))