aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/eval.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/lang/eval.lux (renamed from new-luxc/source/luxc/eval.lux)10
1 files changed, 5 insertions, 5 deletions
diff --git a/new-luxc/source/luxc/eval.lux b/new-luxc/source/luxc/lang/eval.lux
index 6431b59d6..20c3acaeb 100644
--- a/new-luxc/source/luxc/eval.lux
+++ b/new-luxc/source/luxc/lang/eval.lux
@@ -2,16 +2,16 @@
lux
(lux (control [monad #+ do])
[meta])
- (luxc (lang (analysis [";A" expression])
+ (luxc ["&" lang]
+ (lang (analysis [";A" expression])
(synthesis [";S" expression])
(translation [";T" expression]
- [";T" eval])))
- [../base])
+ [";T" eval]))))
(def: #export (eval type exprC)
- ../base;Eval
+ &;Eval
(do meta;Monad<Meta>
- [exprA (../base;with-expected-type type
+ [exprA (&;with-expected-type type
(expressionA;analyser eval exprC))
#let [exprS (expressionS;synthesize exprA)]
exprI (expressionT;translate exprS)]