diff options
author | Eduardo Julian | 2021-09-07 22:50:21 -0400 |
---|---|---|
committer | Eduardo Julian | 2021-09-07 22:50:21 -0400 |
commit | 35c0807799717cd720ab28b35851c1a01a67445d (patch) | |
tree | c6237b79fb262d24c8a46ee3ecb714df3e9874d8 /lux-jvm/source/luxc/lang/host | |
parent | b55cefcb258f11eeee32c1478faefd1bd09ec871 (diff) |
De-taggification | part 4
Diffstat (limited to 'lux-jvm/source/luxc/lang/host')
-rw-r--r-- | lux-jvm/source/luxc/lang/host/jvm.lux | 12 | ||||
-rw-r--r-- | lux-jvm/source/luxc/lang/host/jvm/def.lux | 30 | ||||
-rw-r--r-- | lux-jvm/source/luxc/lang/host/jvm/inst.lux | 34 |
3 files changed, 38 insertions, 38 deletions
diff --git a/lux-jvm/source/luxc/lang/host/jvm.lux b/lux-jvm/source/luxc/lang/host/jvm.lux index 206408ce0..a7eb07777 100644 --- a/lux-jvm/source/luxc/lang/host/jvm.lux +++ b/lux-jvm/source/luxc/lang/host/jvm.lux @@ -6,17 +6,17 @@ monad] [control ["<>" parser - ["<.>" code]]] + ["<[0]>" code]]] [data [binary {"+" [Binary]}] [collection - ["." list ("#\." monad)]]] + ["[0]" list ("[1]\[0]" monad)]]] [macro - ["." code] + ["[0]" code] [syntax {"+" [syntax:]}]] [target [jvm - ["." type {"+" [Type]} + ["[0]" type {"+" [Type]} [category {"+" [Class]}]]]] [tool [compiler @@ -24,7 +24,7 @@ [variable {"+" [Register]}]] [language [lux - ["." generation]]] + ["[0]" generation]]] [meta [archive {"+" [Archive]}]]]]]]) @@ -33,7 +33,7 @@ (import: org/objectweb/asm/ClassWriter) (import: org/objectweb/asm/Label - ["#::." + ["[1]::[0]" (new [])]) (type: .public Def diff --git a/lux-jvm/source/luxc/lang/host/jvm/def.lux b/lux-jvm/source/luxc/lang/host/jvm/def.lux index 3260e954c..36aed2d61 100644 --- a/lux-jvm/source/luxc/lang/host/jvm/def.lux +++ b/lux-jvm/source/luxc/lang/host/jvm/def.lux @@ -1,28 +1,28 @@ (.module: [library [lux {"-" [Type]} - ["." ffi {"+" [import: do_to]}] + ["[0]" ffi {"+" [import: do_to]}] [control - ["." function]] + ["[0]" function]] [data - ["." product] - ["." text + ["[0]" product] + ["[0]" text ["%" format {"+" [format]}]] [collection - ["." array {"+" [Array]}] - ["." list ("#@." functor)]]] + ["[0]" array {"+" [Array]}] + ["[0]" list ("[1]@[0]" functor)]]] [math [number ["i" int]]] [target [jvm [encoding - ["." name]] - ["." type {"+" [Type Constraint]} + ["[0]" name]] + ["[0]" type {"+" [Type Constraint]} [category {"+" [Class Value Method]}] - ["." signature] - ["." descriptor]]]]]] - ["." //]) + ["[0]" signature] + ["[0]" descriptor]]]]]] + ["[0]" //]) (def: signature (|>> type.signature signature.signature)) (def: descriptor (|>> type.descriptor descriptor.descriptor)) @@ -32,7 +32,7 @@ (import: java/lang/String) (import: org/objectweb/asm/Opcodes - ["#::." + ["[1]::[0]" ("static" ACC_PUBLIC int) ("static" ACC_PROTECTED int) ("static" ACC_PRIVATE int) @@ -59,17 +59,17 @@ ("static" V1_8 int)]) (import: org/objectweb/asm/FieldVisitor - ["#::." + ["[1]::[0]" (visitEnd [] void)]) (import: org/objectweb/asm/MethodVisitor - ["#::." + ["[1]::[0]" (visitCode [] void) (visitMaxs [int int] void) (visitEnd [] void)]) (import: org/objectweb/asm/ClassWriter - ["#::." + ["[1]::[0]" ("static" COMPUTE_MAXS int) ("static" COMPUTE_FRAMES int) (new [int]) diff --git a/lux-jvm/source/luxc/lang/host/jvm/inst.lux b/lux-jvm/source/luxc/lang/host/jvm/inst.lux index 9a622da03..2255774f8 100644 --- a/lux-jvm/source/luxc/lang/host/jvm/inst.lux +++ b/lux-jvm/source/luxc/lang/host/jvm/inst.lux @@ -1,23 +1,23 @@ (.module: [library [lux {"-" [Type int char try]} - ["." ffi {"+" [import: do_to]}] + ["[0]" ffi {"+" [import: do_to]}] [abstract [monad {"+" [do]}]] [control - ["." function] - ["." maybe] - ["." try] + ["[0]" function] + ["[0]" maybe] + ["[0]" try] ["p" parser ["s" code]]] [data - ["." product] + ["[0]" product] [collection - ["." list ("#@." functor)]]] + ["[0]" list ("[1]@[0]" functor)]]] [macro [syntax {"+" [syntax:]}] - ["." code] - ["." template]] + ["[0]" code] + ["[0]" template]] [math [number ["n" nat] @@ -25,16 +25,16 @@ [target [jvm [encoding - ["." name {"+" [External]}]] - ["." type {"+" [Type]} ("#@." equivalence) + ["[0]" name {"+" [External]}]] + ["[0]" type {"+" [Type]} ("[1]@[0]" equivalence) [category {"+" [Void Value Return Method Primitive Object Class Array Var Parameter]}] - ["." box] - ["." descriptor] - ["." reflection]]]] + ["[0]" box] + ["[0]" descriptor] + ["[0]" reflection]]]] [tool [compiler [phase {"+" [Operation]}]]]]] - ["." // {"+" [Inst]}]) + ["[0]" // {"+" [Inst]}]) (def: class_name (|>> type.descriptor descriptor.class_name name.read)) (def: descriptor (|>> type.descriptor descriptor.descriptor)) @@ -50,7 +50,7 @@ in)) (`` (import: org/objectweb/asm/Opcodes - ["#::." + ["[1]::[0]" ("static" NOP int) ... Conversion @@ -126,11 +126,11 @@ )) (import: org/objectweb/asm/Label - ["#::." + ["[1]::[0]" (new [])]) (import: org/objectweb/asm/MethodVisitor - ["#::." + ["[1]::[0]" (visitCode [] void) (visitMaxs [int int] void) (visitEnd [] void) |