diff options
Diffstat (limited to '')
-rw-r--r-- | new-luxc/source/luxc/lang/host.jvm.lux (renamed from new-luxc/source/luxc/host.jvm.lux) | 2 | ||||
-rw-r--r-- | new-luxc/source/luxc/lang/host/jvm.lux (renamed from new-luxc/source/luxc/host/jvm.lux) | 0 | ||||
-rw-r--r-- | new-luxc/source/luxc/lang/host/jvm/def.lux (renamed from new-luxc/source/luxc/host/jvm/def.lux) | 0 | ||||
-rw-r--r-- | new-luxc/source/luxc/lang/host/jvm/inst.lux (renamed from new-luxc/source/luxc/host/jvm/inst.lux) | 0 | ||||
-rw-r--r-- | new-luxc/source/luxc/lang/host/jvm/type.lux (renamed from new-luxc/source/luxc/host/jvm/type.lux) | 0 | ||||
-rw-r--r-- | new-luxc/source/luxc/lang/host/macro.lux (renamed from new-luxc/source/luxc/host/macro.lux) | 6 |
6 files changed, 4 insertions, 4 deletions
diff --git a/new-luxc/source/luxc/host.jvm.lux b/new-luxc/source/luxc/lang/host.jvm.lux index e8dc4e17a..ae1d29387 100644 --- a/new-luxc/source/luxc/host.jvm.lux +++ b/new-luxc/source/luxc/lang/host.jvm.lux @@ -12,7 +12,7 @@ [meta #+ Monad<Meta>] [host #+ do-to object] [io]) - (luxc ["&" base] + (luxc ["&" lang] (lang [";L" variable #+ Register] (translation [";T" common])))) diff --git a/new-luxc/source/luxc/host/jvm.lux b/new-luxc/source/luxc/lang/host/jvm.lux index 24d4a9ea9..24d4a9ea9 100644 --- a/new-luxc/source/luxc/host/jvm.lux +++ b/new-luxc/source/luxc/lang/host/jvm.lux diff --git a/new-luxc/source/luxc/host/jvm/def.lux b/new-luxc/source/luxc/lang/host/jvm/def.lux index 60009fb5c..60009fb5c 100644 --- a/new-luxc/source/luxc/host/jvm/def.lux +++ b/new-luxc/source/luxc/lang/host/jvm/def.lux diff --git a/new-luxc/source/luxc/host/jvm/inst.lux b/new-luxc/source/luxc/lang/host/jvm/inst.lux index 37ab75020..37ab75020 100644 --- a/new-luxc/source/luxc/host/jvm/inst.lux +++ b/new-luxc/source/luxc/lang/host/jvm/inst.lux diff --git a/new-luxc/source/luxc/host/jvm/type.lux b/new-luxc/source/luxc/lang/host/jvm/type.lux index 3825d443b..3825d443b 100644 --- a/new-luxc/source/luxc/host/jvm/type.lux +++ b/new-luxc/source/luxc/lang/host/jvm/type.lux 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) |