1 files changed, 8 insertions, 0 deletions
diff --git a/src/vhdl/sem_scopes.adb b/src/vhdl/sem_scopes.adb
index aeecbc8a7..2f70832e0 100644
--- a/src/vhdl/sem_scopes.adb
+++ b/src/vhdl/sem_scopes.adb
@@ -1438,6 +1438,10 @@ package body Sem_Scopes is
    --  name.
    procedure Use_Selected_Name (Name : Iir) is
    begin
+      if Is_Any_Error (Name) then
+         return;
+      end if;
+
       case Get_Kind (Name) is
          when Iir_Kind_Overload_List =>
             Add_Declarations_List (Get_Overload_List (Name), True);
@@ -1464,6 +1468,10 @@ package body Sem_Scopes is
    --  library denotes by te prefix of the selected name.
    procedure Use_All_Names (Name: Iir) is
    begin
+      if Is_Any_Error (Name) then
+         return;
+      end if;
+
       case Get_Kind (Name) is
          when Iir_Kind_Library_Declaration =>
             Use_Library_All (Name);