From a42177ad571f33622eb300e090152e49e84e19db Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 23 Dec 2022 16:13:59 +0100
Subject: vhdl-sem_inst: avoid a crash after error on package instantiation

---
 src/vhdl/vhdl-sem_inst.adb | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src')

diff --git a/src/vhdl/vhdl-sem_inst.adb b/src/vhdl/vhdl-sem_inst.adb
index c2594747b..b5a390a49 100644
--- a/src/vhdl/vhdl-sem_inst.adb
+++ b/src/vhdl/vhdl-sem_inst.adb
@@ -1059,6 +1059,8 @@ package body Vhdl.Sem_Inst is
                   Set_Associated_Subprogram (Assoc_Formal, Actual_Subprg);
                end;
             end if;
+         when Iir_Kind_Error =>
+            null;
          when others =>
             Error_Kind ("instantiate_generic_map", Assoc);
       end case;
-- 
cgit v1.2.3