From 8b4f0ded7bddaa42cf432f74523bfd6aa1e76fed Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 18 Jul 2018 23:44:29 -0400
Subject: WIP: Fix new-luxc's JVM back-end.

---
 new-luxc/source/luxc/lang/host/jvm/type.lux | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

(limited to 'new-luxc/source/luxc/lang/host/jvm/type.lux')

diff --git a/new-luxc/source/luxc/lang/host/jvm/type.lux b/new-luxc/source/luxc/lang/host/jvm/type.lux
index 0c36e6799..f9a956b86 100644
--- a/new-luxc/source/luxc/lang/host/jvm/type.lux
+++ b/new-luxc/source/luxc/lang/host/jvm/type.lux
@@ -1,8 +1,10 @@
 (.module:
-  [lux #- int char]
-  (lux (data [text]
-             text/format
-             (coll [list "list/" Functor<List>])))
+  [lux (#- int char)
+   [data
+    ["." text
+     format]
+    [collection
+     [list ("list/" Functor<List>)]]]]
   [//])
 
 ## Types
@@ -37,9 +39,9 @@
     +0 elemT
     _ (#//.Array (array (dec depth) elemT))))
 
-(def: #export (binary-name class)
+(def: #export binary-name
   (-> Text Text)
-  (text.replace-all "." "/" class))
+  (text.replace-all "." "/"))
 
 (def: #export (descriptor type)
   (-> //.Type Text)
-- 
cgit v1.2.3