diff options
Diffstat (limited to 'gcc/ada/errout.adb')
-rw-r--r-- | gcc/ada/errout.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/errout.adb b/gcc/ada/errout.adb index 5183289..fb1cc76 100644 --- a/gcc/ada/errout.adb +++ b/gcc/ada/errout.adb @@ -1409,11 +1409,11 @@ package body Errout is Warnings.Table (Warnings.Last).Stop := Source_Ptr'Last; end if; - -- Set all (???) the error nodes to Empty: + -- Set the error nodes to Empty to avoid uninitialized variable + -- references for saves/restores/moves. Error_Msg_Node_1 := Empty; Error_Msg_Node_2 := Empty; - end Initialize; ----------------- |