From d7ffe048ed623283655a11ffc5e75d6e5731f738 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Mon, 2 Jan 2023 19:41:08 +0100
Subject: synth: fix handling of record subtypes for objects
---
src/synth/synth-vhdl_expr.adb | 1 +
1 file changed, 1 insertion(+)
(limited to 'src')
diff --git a/src/synth/synth-vhdl_expr.adb b/src/synth/synth-vhdl_expr.adb
index c33ea4b08..7e28f5225 100644
--- a/src/synth/synth-vhdl_expr.adb
+++ b/src/synth/synth-vhdl_expr.adb
@@ -2491,6 +2491,7 @@ package body Synth.Vhdl_Expr is
case Get_Kind (Expr) is
when Iir_Kind_High_Array_Attribute
| Iir_Kind_Low_Array_Attribute
+ | Iir_Kind_Simple_Name
| Iir_Kind_Indexed_Name
| Iir_Kind_Selected_Element
| Iir_Kind_Integer_Literal
--
cgit v1.2.3