diff options
| author | Bob Duff <duff@adacore.com> | 2019-08-20 09:49:37 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2019-08-20 09:49:37 +0000 |
| commit | 32501d71a9e686c148171671d18e510aa719038c (patch) | |
| tree | 2016e703ea870b06d2366330f211f5ae4fba4e6d /gcc/ada/inline.adb | |
| parent | 7e7f0b0a1df83dd65810a057b5ce4d01618d2fa3 (diff) | |
| download | gcc-32501d71a9e686c148171671d18e510aa719038c.zip gcc-32501d71a9e686c148171671d18e510aa719038c.tar.gz gcc-32501d71a9e686c148171671d18e510aa719038c.tar.bz2 | |
[Ada] Enable delta_aggregate only in Ada 2020 mode
If the delta_aggregate feature is used, the -gnat2020 or -gnatX switch
must be given.
The following test must get an error if neither
-gnat2020 nor -gnatX is specified:
gcc -c delta_aggregate.ads -gnat2012
delta_aggregate.ads:4:18: delta_aggregate is an Ada 202x feature
delta_aggregate.ads:4:18: compile with -gnatX
package Delta_Aggregate is
X : String := "Hello";
Y : String := (X with delta 1 => 'h');
end Delta_Aggregate;
2019-08-20 Bob Duff <duff@adacore.com>
gcc/ada/
* par-ch4.adb: Minor wording change in error messages.
* sem_aggr.adb (Resolve_Delta_Aggregate): Emit an error for Ada
versions prior to Ada 2020.
From-SVN: r274729
Diffstat (limited to 'gcc/ada/inline.adb')
0 files changed, 0 insertions, 0 deletions