vhdl: move sem* packages to vhdl children.

1 files changed, 6 insertions, 6 deletions

diff --git a/src/vhdl/std_package.adb b/src/vhdl/std_package.adb
index a04fafd4c..5dd659d6a 100644
--- a/src/vhdl/std_package.adb
+++ b/src/vhdl/std_package.adb
@@ -22,7 +22,7 @@ with Str_Table;
 with Std_Names; use Std_Names;
 with Flags; use Flags;
 with Iirs_Utils;
-with Sem_Utils;
+with Vhdl.Sem_Utils;
 with Iir_Chains;
 
 package body Std_Package is
@@ -174,7 +174,7 @@ package body Std_Package is
          Set_Expr_Staticness (Res, Locally);
          Set_Name_Staticness (Res, Locally);
          Set_Enum_Pos (Res, Iir_Int32 (Pos));
-         Sem_Utils.Compute_Subprogram_Hash (Res);
+         Vhdl.Sem_Utils.Compute_Subprogram_Hash (Res);
          Set_Nth_Element (List, Pos, Res);
          return Res;
       end Create_Std_Literal;
@@ -195,7 +195,7 @@ package body Std_Package is
       is
          Nxt : Iir;
       begin
-         Sem_Utils.Create_Implicit_Operations (Decl, True);
+         Vhdl.Sem_Utils.Create_Implicit_Operations (Decl, True);
 
          --  Update Last_Decl
          loop
@@ -359,7 +359,7 @@ package body Std_Package is
             Set_Chain (Inter, Inter2);
          end if;
 
-         Sem_Utils.Compute_Subprogram_Hash (Decl);
+         Vhdl.Sem_Utils.Compute_Subprogram_Hash (Decl);
          Add_Decl (Decl);
       end Create_To_String;
 
@@ -384,7 +384,7 @@ package body Std_Package is
          Set_Visible_Flag (Inter, True);
          Set_Interface_Declaration_Chain (Decl, Inter);
 
-         Sem_Utils.Compute_Subprogram_Hash (Decl);
+         Vhdl.Sem_Utils.Compute_Subprogram_Hash (Decl);
          Add_Decl (Decl);
       end Create_Edge_Function;
 
@@ -980,7 +980,7 @@ package body Std_Package is
             Set_Pure_Flag (Function_Now, False);
          end if;
          Set_Implicit_Definition (Function_Now, Iir_Predefined_Now_Function);
-         Sem_Utils.Compute_Subprogram_Hash (Function_Now);
+         Vhdl.Sem_Utils.Compute_Subprogram_Hash (Function_Now);
          Add_Decl (Function_Now);
       end;