aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/elab-vhdl_types.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/elab-vhdl_types.adb')
-rw-r--r--src/synth/elab-vhdl_types.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/synth/elab-vhdl_types.adb b/src/synth/elab-vhdl_types.adb
index e4963a11e..75f27a888 100644
--- a/src/synth/elab-vhdl_types.adb
+++ b/src/synth/elab-vhdl_types.adb
@@ -325,6 +325,7 @@ package body Elab.Vhdl_Types is
Des_Typ : Type_Acc;
Typ : Type_Acc;
begin
+ -- Need to handle incomplete access type.
if Get_Kind (Des_Ind) in Iir_Kinds_Denoting_Name then
T := Get_Named_Entity (Des_Ind);
if Get_Kind (T) = Iir_Kind_Type_Declaration