aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/analysis/structure.lux
diff options
context:
space:
mode:
Diffstat (limited to 'new-luxc/source/luxc/lang/analysis/structure.lux')
-rw-r--r--new-luxc/source/luxc/lang/analysis/structure.lux4
1 files changed, 4 insertions, 0 deletions
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)