1 files changed, 4 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-sem.adb b/src/vhdl/vhdl-sem.adb
index ce0428476..74a0dfc85 100644
--- a/src/vhdl/vhdl-sem.adb
+++ b/src/vhdl/vhdl-sem.adb
@@ -2844,7 +2844,10 @@ package body Vhdl.Sem is
                   Pkg : constant Iir :=
                     Get_Uninstantiated_Package_Decl (Inter);
                begin
-                  if Get_Macro_Expanded_Flag (Pkg) then
+                  --  Could be an error.
+                  if Get_Kind (Pkg) = Iir_Kind_Package_Declaration
+                    and then Get_Macro_Expanded_Flag (Pkg)
+                  then
                      return True;
                   end if;
                end;