diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-09-27 11:54:10 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-09-27 11:54:10 +0200 |
| commit | 65e78a74b676f392436fb36ee82fc0b5cc57f313 (patch) | |
| tree | 0a7b6c7112ac119f5cabc47d74ee65a7bd493ba7 /gcc/ada/par-ch3.adb | |
| parent | 6f5add73cd2e49d770b4ff4255f06381e8cfd6cb (diff) | |
| download | gcc-65e78a74b676f392436fb36ee82fc0b5cc57f313.zip gcc-65e78a74b676f392436fb36ee82fc0b5cc57f313.tar.gz gcc-65e78a74b676f392436fb36ee82fc0b5cc57f313.tar.bz2 | |
[multiple changes]
2011-09-27 Ed Schonberg <schonberg@adacore.com>
* sinfo.ads, par-ch3.adb: Minor comment update: aspect specification
on subtype declarations.
* exp_aggr.adb: Minor comment update.
2011-09-27 Eric Botcazou <ebotcazou@adacore.com>
* exp_util.adb (Safe_Prefixed_Reference): Remove always-false
test in the N_Explicit_Dereference case. Fold double logical
negation in the special loop case and conditionalize it on
Variable_Ref being true.
2011-09-27 Ed Schonberg <schonberg@adacore.com>
* sem_ch4.adb (Analyze_Selected_Component): If the prefix is a
single protected object and the selector is a discriminant or an
entry family, this is a non-overloaded candidate interpretation,
and possible primitive operations of the type must not be
examined.
2011-09-27 Arnaud Charlet <charlet@adacore.com>
* s-taspri-posix-noaltstack.ads (Lock): Mark fields aliased.
From-SVN: r179255
Diffstat (limited to 'gcc/ada/par-ch3.adb')
| -rw-r--r-- | gcc/ada/par-ch3.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/par-ch3.adb b/gcc/ada/par-ch3.adb index 897b8c9..d58bce1 100644 --- a/gcc/ada/par-ch3.adb +++ b/gcc/ada/par-ch3.adb @@ -951,7 +951,8 @@ package body Ch3 is -------------------------------- -- SUBTYPE_DECLARATION ::= - -- subtype DEFINING_IDENTIFIER is [NULL_EXCLUSION] SUBTYPE_INDICATION; + -- subtype DEFINING_IDENTIFIER is [NULL_EXCLUSION] SUBTYPE_INDICATION + -- {ASPECT_SPECIFICATIONS]; -- The caller has checked that the initial token is SUBTYPE |