1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/sem_specs.adb b/src/vhdl/sem_specs.adb
index 6e28c5b39..7f91d38b1 100644
--- a/src/vhdl/sem_specs.adb
+++ b/src/vhdl/sem_specs.adb
@@ -22,6 +22,7 @@ with Evaluation; use Evaluation;
 with Std_Package; use Std_Package;
 with Errorout; use Errorout;
 with Sem; use Sem;
+with Sem_Lib; use Sem_Lib;
 with Sem_Scopes; use Sem_Scopes;
 with Sem_Assocs; use Sem_Assocs;
 with Libraries;
@@ -1539,7 +1540,7 @@ package body Sem_Specs is
          null;
       end if;
 
-      Design_Unit := Libraries.Load_Primary_Unit
+      Design_Unit := Load_Primary_Unit
         (Get_Library (Get_Design_File (Entity_Unit)),
          Get_Identifier (Get_Library_Unit (Entity_Unit)),
          Parent);