diff options
author | Kévin Le Gouguec <legouguec@adacore.com> | 2022-04-07 17:43:34 +0200 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-05-18 08:41:07 +0000 |
commit | df4451ca663e251e5524ebedb34bbe0cbfc45e52 (patch) | |
tree | 68c4fc8af285a3b7174744c60470419028d5aed8 /gcc | |
parent | 8502433d82079d2b01bbe0e324121dc1f658311b (diff) | |
download | gcc-df4451ca663e251e5524ebedb34bbe0cbfc45e52.zip gcc-df4451ca663e251e5524ebedb34bbe0cbfc45e52.tar.gz gcc-df4451ca663e251e5524ebedb34bbe0cbfc45e52.tar.bz2 |
[Ada] Make sure output variable is always initialized
gcc/ada/
* libgnat/s-dwalin.adb (Read_Aranges_Header): Initialize output
parameter in case we return early.
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ada/libgnat/s-dwalin.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/libgnat/s-dwalin.adb b/gcc/ada/libgnat/s-dwalin.adb index 50662dd..5a0a2f6 100644 --- a/gcc/ada/libgnat/s-dwalin.adb +++ b/gcc/ada/libgnat/s-dwalin.adb @@ -1360,6 +1360,7 @@ package body System.Dwarf_Lines is begin Success := False; Info_Offset := 0; + Addr_Size := 0; Read_Initial_Length (C.Aranges, Unit_Length, Is64); |