diff options
author | Tristan Gingold <tgingold@free.fr> | 2023-01-05 08:00:01 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2023-01-05 22:19:10 +0100 |
commit | 52668283c49c40190f68d1ea225ee3496d44d58e (patch) | |
tree | 9cbf3040ce08580314b2696a4fb0214353759874 /src/synth/elab-vhdl_annotations.adb | |
parent | 26b0d55583c1454ad32d17d262d2b4577d0bf6c5 (diff) | |
download | ghdl-52668283c49c40190f68d1ea225ee3496d44d58e.tar.gz ghdl-52668283c49c40190f68d1ea225ee3496d44d58e.tar.bz2 ghdl-52668283c49c40190f68d1ea225ee3496d44d58e.zip |
synth: handle generic mapped packages
Diffstat (limited to 'src/synth/elab-vhdl_annotations.adb')
-rw-r--r-- | src/synth/elab-vhdl_annotations.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/synth/elab-vhdl_annotations.adb b/src/synth/elab-vhdl_annotations.adb index d5eb0eb63..9475ac940 100644 --- a/src/synth/elab-vhdl_annotations.adb +++ b/src/synth/elab-vhdl_annotations.adb @@ -372,7 +372,8 @@ package body Elab.Vhdl_Annotations is -- Create an info on the interface_type_definition. -- This is needed for a generic type in an entity, as the -- nodes are not instantiated. - Create_Object_Info (Block_Info, Get_Type (Decl)); + Create_Object_Info + (Block_Info, Get_Interface_Type_Definition (Decl)); when Iir_Kinds_Interface_Subprogram_Declaration => -- Macro-expanded null; |