diff options
Diffstat (limited to 'new-luxc/source/luxc/generator/host')
| -rw-r--r-- | new-luxc/source/luxc/generator/host/jvm.lux | 8 | ||||
| -rw-r--r-- | new-luxc/source/luxc/generator/host/jvm/def.lux | 14 | ||||
| -rw-r--r-- | new-luxc/source/luxc/generator/host/jvm/inst.lux | 14 |
3 files changed, 18 insertions, 18 deletions
diff --git a/new-luxc/source/luxc/generator/host/jvm.lux b/new-luxc/source/luxc/generator/host/jvm.lux index d67b6ef91..4b4b1d38e 100644 --- a/new-luxc/source/luxc/generator/host/jvm.lux +++ b/new-luxc/source/luxc/generator/host/jvm.lux @@ -6,14 +6,14 @@ [macro] (macro [code] ["s" syntax #+ syntax:]) - [host #+ jvm-import])) + [host])) ## [Host] -(jvm-import org.objectweb.asm.MethodVisitor) +(host;import org.objectweb.asm.MethodVisitor) -(jvm-import org.objectweb.asm.ClassWriter) +(host;import org.objectweb.asm.ClassWriter) -(jvm-import #long org.objectweb.asm.Label +(host;import #long org.objectweb.asm.Label (new [])) ## [Type] diff --git a/new-luxc/source/luxc/generator/host/jvm/def.lux b/new-luxc/source/luxc/generator/host/jvm/def.lux index 8b961b29a..bb1d2cd94 100644 --- a/new-luxc/source/luxc/generator/host/jvm/def.lux +++ b/new-luxc/source/luxc/generator/host/jvm/def.lux @@ -5,15 +5,15 @@ [product] (coll ["a" array] [list "L/" Functor<List>])) - [host #+ jvm-import do-to]) + [host #+ do-to]) ["$" ..] (.. ["$t" type])) ## [Host] -(jvm-import #long java.lang.Object) -(jvm-import #long java.lang.String) +(host;import #long java.lang.Object) +(host;import #long java.lang.String) -(jvm-import org.objectweb.asm.Opcodes +(host;import org.objectweb.asm.Opcodes (#static ACC_PUBLIC int) (#static ACC_PROTECTED int) (#static ACC_PRIVATE int) @@ -40,15 +40,15 @@ (#static V1_8 int) ) -(jvm-import org.objectweb.asm.FieldVisitor +(host;import org.objectweb.asm.FieldVisitor (visitEnd [] void)) -(jvm-import org.objectweb.asm.MethodVisitor +(host;import org.objectweb.asm.MethodVisitor (visitCode [] void) (visitMaxs [int int] void) (visitEnd [] void)) -(jvm-import org.objectweb.asm.ClassWriter +(host;import org.objectweb.asm.ClassWriter (#static COMPUTE_MAXS int) (new [int]) (visit [int int String String String (Array String)] void) diff --git a/new-luxc/source/luxc/generator/host/jvm/inst.lux b/new-luxc/source/luxc/generator/host/jvm/inst.lux index af5f6f6d8..6085ff72b 100644 --- a/new-luxc/source/luxc/generator/host/jvm/inst.lux +++ b/new-luxc/source/luxc/generator/host/jvm/inst.lux @@ -4,7 +4,7 @@ ["p" parser]) (data text/format (coll [list "L/" Functor<List>])) - [host #+ jvm-import do-to] + [host #+ do-to] [macro] (macro [code] ["s" syntax #+ syntax:])) @@ -12,8 +12,8 @@ (.. ["$t" type])) ## [Host] -(jvm-import #long java.lang.Object) -(jvm-import #long java.lang.String) +(host;import #long java.lang.Object) +(host;import #long java.lang.String) (syntax: (declare [codes (p;many s;local-symbol)]) (|> codes @@ -34,7 +34,7 @@ LADD LSUB LMUL LDIV LREM LCMP DADD DSUB DMUL DDIV DREM DCMPG) <return> (declare RETURN IRETURN LRETURN DRETURN ARETURN)] - (jvm-import org.objectweb.asm.Opcodes + (host;import org.objectweb.asm.Opcodes <primitive> (#static CHECKCAST int) @@ -82,13 +82,13 @@ <return> )) -(jvm-import org.objectweb.asm.FieldVisitor +(host;import org.objectweb.asm.FieldVisitor (visitEnd [] void)) -(jvm-import org.objectweb.asm.Label +(host;import org.objectweb.asm.Label (new [])) -(jvm-import org.objectweb.asm.MethodVisitor +(host;import org.objectweb.asm.MethodVisitor (visitCode [] void) (visitMaxs [int int] void) (visitEnd [] void) |