diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2018-12-03 15:49:12 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2018-12-03 15:49:12 +0000 |
| commit | 9f8483ca8f858ea19e3e0fcf567820e3195fe2de (patch) | |
| tree | 66452a5079e3ab6a4a9e1bf0d4c9aaced7b77d29 /gcc/fortran | |
| parent | c899d4bafcad17c7d493123cdf75ce4f54e0f8c1 (diff) | |
| download | gcc-9f8483ca8f858ea19e3e0fcf567820e3195fe2de.zip gcc-9f8483ca8f858ea19e3e0fcf567820e3195fe2de.tar.gz gcc-9f8483ca8f858ea19e3e0fcf567820e3195fe2de.tar.bz2 | |
[Ada] Fix problematic overloading of operator in Ada 95 mode
The change reverts the test deciding whether an initialization procedure
can be inherited from parent to derived type to the original
implementation, which allowed inheriting a null procedure.
This prevents the creation of another null initialization procedure for
the derived type, which in turn can avoid an artificial overloading
which can wreak havoc in the analysis of private declarations of a
package.
2018-12-03 Eric Botcazou <ebotcazou@adacore.com>
gcc/ada/
* exp_ch3.adb (Build_Record_Init_Proc): Inherit an
initialization procedure if it is present, even if it is null.
gcc/testsuite/
* gnat.dg/overload2.adb, gnat.dg/overload2_p.adb,
gnat.dg/overload2_p.ads, gnat.dg/overload2_q.adb,
gnat.dg/overload2_q.ads: New testcase.
From-SVN: r266753
Diffstat (limited to 'gcc/fortran')
0 files changed, 0 insertions, 0 deletions