From 0b87f118978e9971828d2c9ccabe685b0c5e4c35 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 5 Dec 2017 19:09:28 -0400
Subject: - Fixed a bug when analysing empty records.

---
 new-luxc/source/luxc/lang/analysis/structure.lux | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'new-luxc/source/luxc/lang/analysis/structure.lux')

diff --git a/new-luxc/source/luxc/lang/analysis/structure.lux b/new-luxc/source/luxc/lang/analysis/structure.lux
index ce678837e..403fe4730 100644
--- a/new-luxc/source/luxc/lang/analysis/structure.lux
+++ b/new-luxc/source/luxc/lang/analysis/structure.lux
@@ -18,6 +18,7 @@
               ["&." module]
               ["la" analysis]
               (analysis ["&." common]
+                        [".A" primitive]
                         ["&." inference]))))
 
 (exception: #export Invalid-Variant-Type)
@@ -331,6 +332,9 @@
     [members (normalize members)
      [membersC recordT] (order members)]
     (case membersC
+      (^ (list))
+      primitiveA.analyse-unit
+      
       (^ (list singletonC))
       (analyse singletonC)
 
-- 
cgit v1.2.3