@@ -50,6 +50,7 @@ with Switch; use Switch;
with Switch.B; use Switch.B;
with Targparm; use Targparm;
with Types; use Types;
+with Uintp;
with System.Case_Util; use System.Case_Util;
with System.Response_File;
@@ -617,6 +618,7 @@ begin
-- is in some cases important.
Csets.Initialize;
+ Uintp.Initialize;
Snames.Initialize;
-- Scan the switches and arguments. Note that Snames must already be
@@ -44,6 +44,7 @@ with Snames;
with Stringt;
with Switch; use Switch;
with Types; use Types;
+with Uintp;
with GNAT.Case_Util; use GNAT.Case_Util;
with GNAT.Command_Line; use GNAT.Command_Line;
@@ -2023,6 +2024,7 @@ begin
-- Initialize standard packages
Csets.Initialize;
+ Uintp.Initialize;
Snames.Initialize;
Stringt.Initialize;
@@ -37,6 +37,7 @@ with Snames;
with Stringt; use Stringt;
with Switch; use Switch;
with Types; use Types;
+with Uintp;
with Ada.Command_Line; use Ada.Command_Line;
with Ada.Text_IO; use Ada.Text_IO;
@@ -169,6 +170,7 @@ package body GPrep is
-- Do some initializations (order is important here)
Csets.Initialize;
+ Uintp.Initialize;
Snames.Initialize;
Stringt.Initialize;
Prep.Initialize;
@@ -44,6 +44,7 @@ with SFN_Scan;
with Sinput;
with Snames;
with Stringt;
+with Uintp;
pragma Warnings (Off);
with System.HTable;
@@ -3676,6 +3677,7 @@ package body Make is
Linker_Switches.Init;
Csets.Initialize;
+ Uintp.Initialize;
Snames.Initialize;
Stringt.Initialize;