mirror of git://gcc.gnu.org/git/gcc.git
[Ada] Sem_Elab: remove duplicate condition
2018-07-31 Arnaud Charlet <charlet@adacore.com> gcc/ada/ * sem_elab.adb: Remove duplicate condition detected by CodePeer. From-SVN: r263106
This commit is contained in:
parent
0d756922b0
commit
fa9f3f8c44
|
|
@ -1,3 +1,7 @@
|
||||||
|
2018-07-31 Arnaud Charlet <charlet@adacore.com>
|
||||||
|
|
||||||
|
* sem_elab.adb: Remove duplicate condition detected by CodePeer.
|
||||||
|
|
||||||
2018-07-31 Ed Schonberg <schonberg@adacore.com>
|
2018-07-31 Ed Schonberg <schonberg@adacore.com>
|
||||||
|
|
||||||
* exp_unst.adb (Subp_Index): In the case of a protected
|
* exp_unst.adb (Subp_Index): In the case of a protected
|
||||||
|
|
|
||||||
|
|
@ -4763,7 +4763,6 @@ package body Sem_Elab is
|
||||||
and then not Comes_From_Source (N)
|
and then not Comes_From_Source (N)
|
||||||
and then Present (Context)
|
and then Present (Context)
|
||||||
and then Nkind (Context) = N_Handled_Sequence_Of_Statements
|
and then Nkind (Context) = N_Handled_Sequence_Of_Statements
|
||||||
and then not Comes_From_Source (N)
|
|
||||||
then
|
then
|
||||||
return False;
|
return False;
|
||||||
end if;
|
end if;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue