From 52668283c49c40190f68d1ea225ee3496d44d58e Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 5 Jan 2023 08:00:01 +0100
Subject: synth: handle generic mapped packages

---
 src/synth/elab-vhdl_annotations.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/synth/elab-vhdl_annotations.adb')

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;
-- 
cgit v1.2.3