From 1173ddab8255781e0e2bff2b92e8d07b7bf1c26d Mon Sep 17 00:00:00 2001
From: Patrick Lehmann <Patrick.Lehmann@plc2.de>
Date: Wed, 23 Jun 2021 02:03:20 +0200
Subject: Extract record type elements.

---
 pyGHDL/dom/Type.py       |  6 ++++++
 pyGHDL/dom/_Translate.py | 18 ++++++++++++++++--
 2 files changed, 22 insertions(+), 2 deletions(-)

(limited to 'pyGHDL')

diff --git a/pyGHDL/dom/Type.py b/pyGHDL/dom/Type.py
index 69cf97af0..1576eb849 100644
--- a/pyGHDL/dom/Type.py
+++ b/pyGHDL/dom/Type.py
@@ -37,6 +37,7 @@ from pyVHDLModel.VHDLModel import (
     IntegerType as VHDLModel_IntegerType,
     EnumeratedType as VHDLModel_EnumeratedType,
     ArrayType as VHDLModel_ArrayType,
+    RecordTypeElement as VHDLModel_RecordTypeElement,
     RecordType as VHDLModel_RecordType,
     AccessType as VHDLModel_AccessType,
     SubType as VHDLModel_SubType,
@@ -62,6 +63,11 @@ class ArrayType(VHDLModel_ArrayType):
     pass
 
 
+@export
+class RecordTypeElement(VHDLModel_RecordTypeElement):
+    pass
+
+
 @export
 class RecordType(VHDLModel_RecordType):
     pass
diff --git a/pyGHDL/dom/_Translate.py b/pyGHDL/dom/_Translate.py
index 7239da77c..a3e3a7c96 100644
--- a/pyGHDL/dom/_Translate.py
+++ b/pyGHDL/dom/_Translate.py
@@ -57,7 +57,14 @@ from pyGHDL.dom.Symbol import (
     ConstrainedSubTypeSymbol,
     IndexedObjectOrFunctionCallSymbol,
 )
-from pyGHDL.dom.Type import IntegerType, SubType, ArrayType, RecordType, EnumeratedType
+from pyGHDL.dom.Type import (
+    IntegerType,
+    SubType,
+    ArrayType,
+    RecordType,
+    EnumeratedType,
+    RecordTypeElement,
+)
 from pyGHDL.dom.Range import Range, RangeExpression
 from pyGHDL.dom.Literal import (
     IntegerLiteral,
@@ -198,8 +205,15 @@ def GetTypeFromNode(node: Iir) -> BaseType:
 
         return ArrayType(typeName)
     elif kind == nodes.Iir_Kind.Record_Type_Definition:
+        elements = []
+        elementDeclarations = nodes.Get_Elements_Declaration_List(typeDefinition)
+        for element in utils.flist_iter(elementDeclarations):
+            elementName = GetNameOfNode(element)
+            elementType = None  # GetSubtypeIndicationFromNode(element)
+
+            elements.append(RecordTypeElement(elementName, elementType))
 
-        return RecordType(typeName)
+        return RecordType(typeName, elements)
     else:
         position = GetPositionOfNode(typeDefinition)
         raise DOMException(
-- 
cgit v1.2.3