diff options
| author | Bob Duff <duff@adacore.com> | 2019-08-20 09:48:11 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2019-08-20 09:48:11 +0000 |
| commit | a89a0dd3b7ae2180dbfdc609fc9d7c61f250b32c (patch) | |
| tree | c412fc6e79c8c6d9fd37e9a0f0945ebc42b8239f /gcc | |
| parent | b6ad3c0844bd20dece60aa20ccd3a196d34290d9 (diff) | |
| download | gcc-a89a0dd3b7ae2180dbfdc609fc9d7c61f250b32c.zip gcc-a89a0dd3b7ae2180dbfdc609fc9d7c61f250b32c.tar.gz gcc-a89a0dd3b7ae2180dbfdc609fc9d7c61f250b32c.tar.bz2 | |
[Ada] Sem_Ch13: fix uninitialized parameter static analysis warning
No functional change.
2019-08-20 Bob Duff <duff@adacore.com>
gcc/ada/
* sem_ch13.adb (Record_Hole_Check): Initialize After_Last.
From-SVN: r274719
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/sem_ch13.adb | 2 |
2 files changed, 6 insertions, 0 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index b1640e2..9c22681 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2019-08-20 Bob Duff <duff@adacore.com> + + * sem_ch13.adb (Record_Hole_Check): Initialize After_Last. + 2019-08-20 Piotr Trojanek <trojanek@adacore.com> * impunit.adb (Get_Kind_Of_Unit): Revert change for adapting diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb index a3a7be7..4a07478 100644 --- a/gcc/ada/sem_ch13.adb +++ b/gcc/ada/sem_ch13.adb @@ -10438,6 +10438,8 @@ package body Sem_Ch13 is Sbit := Uint_0; end if; + After_Last := Uint_0; + if Nkind (Decl) = N_Full_Type_Declaration then Record_Definition := Type_Definition (Decl); |