aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/host/jvm
diff options
context:
space:
mode:
Diffstat (limited to 'new-luxc/source/luxc/lang/host/jvm')
-rw-r--r--new-luxc/source/luxc/lang/host/jvm/def.lux4
-rw-r--r--new-luxc/source/luxc/lang/host/jvm/inst.lux4
-rw-r--r--new-luxc/source/luxc/lang/host/jvm/type.lux12
3 files changed, 10 insertions, 10 deletions
diff --git a/new-luxc/source/luxc/lang/host/jvm/def.lux b/new-luxc/source/luxc/lang/host/jvm/def.lux
index 60009fb5c..ec1de6b43 100644
--- a/new-luxc/source/luxc/lang/host/jvm/def.lux
+++ b/new-luxc/source/luxc/lang/host/jvm/def.lux
@@ -6,8 +6,8 @@
(coll ["a" array]
[list "list/" Functor<List>]))
[host #+ do-to])
- ["$" ..]
- (.. ["$t" type]))
+ ["$" //]
+ (// ["$t" type]))
## [Host]
(host;import #long java.lang.Object)
diff --git a/new-luxc/source/luxc/lang/host/jvm/inst.lux b/new-luxc/source/luxc/lang/host/jvm/inst.lux
index dc2909b69..e0c10feca 100644
--- a/new-luxc/source/luxc/lang/host/jvm/inst.lux
+++ b/new-luxc/source/luxc/lang/host/jvm/inst.lux
@@ -10,8 +10,8 @@
[macro]
(macro [code]
["s" syntax #+ syntax:]))
- ["$" ..]
- (.. ["$t" type]))
+ ["$" //]
+ (// ["$t" type]))
## [Host]
(host;import #long java.lang.Object)
diff --git a/new-luxc/source/luxc/lang/host/jvm/type.lux b/new-luxc/source/luxc/lang/host/jvm/type.lux
index 3825d443b..03246540c 100644
--- a/new-luxc/source/luxc/lang/host/jvm/type.lux
+++ b/new-luxc/source/luxc/lang/host/jvm/type.lux
@@ -2,8 +2,8 @@
[lux #- char]
(lux (data [text]
text/format
- (coll [list "L/" Functor<List>])))
- ["$" ..])
+ (coll [list "list/" Functor<List>])))
+ ["$" //])
## Types
(do-template [<name> <primitive>]
@@ -91,7 +91,7 @@
""
(format "<"
(|> params
- (L/map (|>. #$;Generic signature))
+ (list/map (|>. #$;Generic signature))
(text;join-with ""))
">"))]
(format "L" (binary-name class) =params ";"))
@@ -116,7 +116,7 @@
(def: #export (method-descriptor method)
(-> $;Method Text)
- (format "(" (text;join-with "" (L/map descriptor (get@ #$;args method))) ")"
+ (format "(" (text;join-with "" (list/map descriptor (get@ #$;args method))) ")"
(case (get@ #$;return method)
#;None
"V"
@@ -126,7 +126,7 @@
(def: #export (method-signature method)
(-> $;Method Text)
- (format "(" (|> (get@ #$;args method) (L/map signature) (text;join-with "")) ")"
+ (format "(" (|> (get@ #$;args method) (list/map signature) (text;join-with "")) ")"
(case (get@ #$;return method)
#;None
"V"
@@ -134,5 +134,5 @@
(#;Some return)
(signature return))
(|> (get@ #$;exceptions method)
- (L/map (|>. #$;Generic signature (format "^")))
+ (list/map (|>. #$;Generic signature (format "^")))
(text;join-with ""))))