diff options
Diffstat (limited to 'new-luxc/source/luxc/lang/host/jvm/type.lux')
| -rw-r--r-- | new-luxc/source/luxc/lang/host/jvm/type.lux | 12 |
1 files changed, 6 insertions, 6 deletions
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 "")))) |