aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/host/macro.lux
diff options
context:
space:
mode:
authorEduardo Julian2017-11-15 19:51:33 -0400
committerEduardo Julian2017-11-15 19:51:33 -0400
commit296d087530cb142efec1dea159770346bb43c3c0 (patch)
treebde43594e5df48af539a0fda3e13cbf6aa36b557 /new-luxc/source/luxc/lang/host/macro.lux
parentc4e928e5805054aa12da40baaeccbb9c522b52d0 (diff)
- Heavy refactoring.
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/lang/host/macro.lux (renamed from new-luxc/source/luxc/host/macro.lux)6
1 files changed, 3 insertions, 3 deletions
diff --git a/new-luxc/source/luxc/host/macro.lux b/new-luxc/source/luxc/lang/host/macro.lux
index 1a3152222..01f8c3bdb 100644
--- a/new-luxc/source/luxc/host/macro.lux
+++ b/new-luxc/source/luxc/lang/host/macro.lux
@@ -4,8 +4,8 @@
(data ["e" error])
[meta]
[host])
- (luxc [";L" host]
- (lang (translation [";T" common]))))
+ (luxc (lang (translation [";T" common])))
+ [..])
(for {"JVM" (as-is (host;import java.lang.reflect.Method
(invoke [Object (Array Object)] #try Object))
@@ -23,7 +23,7 @@
(def: #export (expand macro inputs)
(-> Macro (List Code) (Meta (List Code)))
(do meta;Monad<Meta>
- [class (commonT;load-class hostL;function-class)]
+ [class (commonT;load-class ..;function-class)]
(function [compiler]
(do e;Monad<Error>
[apply-method (Class.getMethod ["apply" _apply-args] class)