aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/extension/statement.lux
diff options
context:
space:
mode:
authorEduardo Julian2018-07-03 18:40:16 -0400
committerEduardo Julian2018-07-03 18:40:16 -0400
commitd3f5e1f4baa667bc2eb72edd542cf5d8cd3924ce (patch)
tree2aa771401cce0d08276abc072b9d31e00a651f29 /new-luxc/source/luxc/lang/extension/statement.lux
parentbfd2d6c203042dfddb0ce29db3696365fe213314 (diff)
- Re-named ":!" to ":coerce".
Diffstat (limited to 'new-luxc/source/luxc/lang/extension/statement.lux')
-rw-r--r--new-luxc/source/luxc/lang/extension/statement.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/new-luxc/source/luxc/lang/extension/statement.lux b/new-luxc/source/luxc/lang/extension/statement.lux
index a92995630..9b7b9da52 100644
--- a/new-luxc/source/luxc/lang/extension/statement.lux
+++ b/new-luxc/source/luxc/lang/extension/statement.lux
@@ -49,7 +49,7 @@
(expressionA.analyser evalL.eval annsC)))
annsI (expressionT.translate (expressionS.synthesize syntheses annsA))
annsV (evalT.eval annsI)]
- (wrap [annsI (:! Code annsV)])))
+ (wrap [annsI (:coerce Code annsV)])))
(def: (ensure-valid-alias def-name annotations value)
(-> Text Code Code (Meta Any))
@@ -82,7 +82,7 @@
#.None
(do @
[[_ valueT valueA] (lang.with-scope
- (if (macro.type? (:! Code annotationsV))
+ (if (macro.type? (:coerce Code annotationsV))
(do @
[valueA (lang.with-type Type
(expressionA.analyser evalL.eval valueC))]
@@ -130,7 +130,7 @@
syntheses //.all-syntheses
valueI (expressionT.translate (expressionS.synthesize syntheses valueA))
valueV (evalT.eval valueI)
- _ (<installer> name (:! <type> valueV))]
+ _ (<installer> name (:coerce <type> valueV))]
(wrap []))
_