diff options
author | Javier Miranda <miranda@adacore.com> | 2020-06-06 11:26:18 -0400 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-07-16 05:18:00 -0400 |
commit | aab8cf8ba42686aa9dee8a2bd61281c921784893 (patch) | |
tree | 8b7485bedd8db7efa0b3b8af9f4a70a410f1e66d /gcc | |
parent | c7641c228af7c53b5f2ab5ef047f1e36f6a6f3c5 (diff) | |
download | gcc-aab8cf8ba42686aa9dee8a2bd61281c921784893.zip gcc-aab8cf8ba42686aa9dee8a2bd61281c921784893.tar.gz gcc-aab8cf8ba42686aa9dee8a2bd61281c921784893.tar.bz2 |
[Ada] Avoid false positive reported by CodePeer
gcc/ada/
* exp_attr.adb (Expand_Access_To_Protected_Op): Initialize
variable Sub to Empty to avoid false positive reported by
Codepeer.
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ada/exp_attr.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_attr.adb b/gcc/ada/exp_attr.adb index 08c7118..cbc1fdd 100644 --- a/gcc/ada/exp_attr.adb +++ b/gcc/ada/exp_attr.adb @@ -969,7 +969,7 @@ package body Exp_Attr is Loc : constant Source_Ptr := Sloc (N); Agg : Node_Id; Btyp : constant Entity_Id := Base_Type (Typ); - Sub : Entity_Id; + Sub : Entity_Id := Empty; Sub_Ref : Node_Id; E_T : constant Entity_Id := Equivalent_Type (Btyp); Acc : constant Entity_Id := |