- Updated new compiler's code to the recent changes in the language.

- WIP: Some other changes/additions to the new compiler.

1 files changed, 3 insertions, 3 deletions

diff --git a/new-luxc/source/luxc/generator/host/jvm/def.lux b/new-luxc/source/luxc/generator/host/jvm/def.lux
index 8931db940..8b961b29a 100644
--- a/new-luxc/source/luxc/generator/host/jvm/def.lux
+++ b/new-luxc/source/luxc/generator/host/jvm/def.lux
@@ -62,7 +62,7 @@
   (-> (List Text) (a;Array Text))
   (let [output (host;array String (list;size values))]
     (exec (L/map (function [[idx value]]
-                   (host;array-store idx value output))
+                   (host;array-write idx value output))
                  (list;enumerate values))
       output)))
 
@@ -261,8 +261,8 @@
   [short-field   Int  $t;short   host;l2s]
   [int-field     Int  $t;int     host;l2i]
   [long-field    Int  $t;long    id]
-  [float-field   Real $t;float   host;d2f]
-  [double-field  Real $t;double  id]
+  [float-field   Frac $t;float   host;d2f]
+  [double-field  Frac $t;double  id]
   [char-field    Nat  $t;char    (|>. nat-to-int host;l2i host;i2c)]
   [string-field  Text ($t;class "java.lang.String" (list)) id]
   )