diff options
author | Justin Squirek <squirek@adacore.com> | 2022-05-10 18:19:10 +0000 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-06-02 09:06:37 +0000 |
commit | 68eb05a3b6ae3a973c858811dc11c7d54a77a58b (patch) | |
tree | 7beb93d2ed2896dfa2299c6f013444ae1fe6027e /gcc/ada/make.adb | |
parent | 878043af338c3b49f7848f3b73938cfa75a97393 (diff) | |
download | gcc-68eb05a3b6ae3a973c858811dc11c7d54a77a58b.zip gcc-68eb05a3b6ae3a973c858811dc11c7d54a77a58b.tar.gz gcc-68eb05a3b6ae3a973c858811dc11c7d54a77a58b.tar.bz2 |
[Ada] Gnatbind crash during checksum calculation
This patch corrects an error in the compiler whereby gnatbind may crash
during calculation of file checksums in certain corner cases due to
uninitialized lookup tables.
gcc/ada/
* gnatbind.adb (Gnatbind): Add initialize call for Uintp
* gnatls.adb (Gnatls): Likewise.
* gprep.adb (Gnatprep): Likewise.
* make.adb (Initialize): Likewise.
Diffstat (limited to 'gcc/ada/make.adb')
-rw-r--r-- | gcc/ada/make.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb index bbabd76..3ed4656 100644 --- a/gcc/ada/make.adb +++ b/gcc/ada/make.adb @@ -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; |