Extract record type elements.

1 files changed, 16 insertions, 2 deletions

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(