From db7e1aa8644ec803d3de1ac6acef8e9beaf50e96 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 3 Aug 2021 03:49:15 +0200
Subject: vhdl-sem_expr.adb: build element subtype for aggregate when possible.

In case of array aggregate whose element subtype is not bounded, extract it from
the aggregate elements.

Fix #1055
Fix #1455
---
 src/vhdl/translate/trans-chap7.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/vhdl/translate')

diff --git a/src/vhdl/translate/trans-chap7.adb b/src/vhdl/translate/trans-chap7.adb
index 07c28ac33..db76a9178 100644
--- a/src/vhdl/translate/trans-chap7.adb
+++ b/src/vhdl/translate/trans-chap7.adb
@@ -3519,7 +3519,7 @@ package body Trans.Chap7 is
    begin
       case Iir_Kinds_Composite_Type_Definition (Get_Kind (Target_Type)) is
          when Iir_Kind_Array_Subtype_Definition
-           | Iir_Kind_Array_Type_Definition =>
+            | Iir_Kind_Array_Type_Definition =>
             declare
                El : Iir;
             begin
-- 
cgit v1.2.3