From a6987ad82f107df49853e1601b73076d030d6fc8 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 1 Jun 2020 20:16:32 -0400
Subject: Implemented an optimization for getting fields/slots from records in
 the new compiler.

---
 lux-jvm/source/luxc/lang/translation/jvm/reference.lux | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'lux-jvm/source/luxc/lang/translation/jvm/reference.lux')

diff --git a/lux-jvm/source/luxc/lang/translation/jvm/reference.lux b/lux-jvm/source/luxc/lang/translation/jvm/reference.lux
index 6bcf4a2e5..61eac8dcc 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm/reference.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm/reference.lux
@@ -10,7 +10,8 @@
      ["." type]]]
    [tool
     [compiler
-     ["." reference (#+ Register Variable)]
+     [reference
+      ["." variable (#+ Register Variable)]]
      ["." phase ("operation@." monad)]
      [meta
       [archive (#+ Archive)]]
@@ -51,10 +52,10 @@
 (def: #export (variable archive variable)
   (-> Archive Variable (Operation Inst))
   (case variable
-    (#reference.Local variable)
+    (#variable.Local variable)
     (operation@wrap (local variable))
     
-    (#reference.Foreign variable)
+    (#variable.Foreign variable)
     (foreign archive variable)))
 
 (def: #export (constant archive name)
-- 
cgit v1.2.3