diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-01-02 10:38:07 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-01-02 10:38:07 +0100 |
| commit | c5d00db06fdfa662780ddbb179a684e221655b34 (patch) | |
| tree | 3810f64351197f20c896eb6cb7beebeef3afda79 /gcc/ada/restrict.adb | |
| parent | 39ce7604727100ff8abd1e5513a303b6df499b7a (diff) | |
| download | gcc-c5d00db06fdfa662780ddbb179a684e221655b34.zip gcc-c5d00db06fdfa662780ddbb179a684e221655b34.tar.gz gcc-c5d00db06fdfa662780ddbb179a684e221655b34.tar.bz2 | |
[multiple changes]
2013-01-02 Thomas Quinot <quinot@adacore.com>
* exp_prag.adb (Expand_Pragma_Check): The statements generated
for the pragma must have the sloc of the pragma, not the
sloc of the condition, otherwise this creates anomalies in the
generated debug information that confuse coverage analysis tools.
2013-01-02 Thomas Quinot <quinot@adacore.com>
* sem_ch13.adb: Minor reformatting.
2013-01-02 Arnaud Charlet <charlet@adacore.com>
* g-excact.ads (Core_Dump): Clarify that this subprogram does
not dump cores under Windows.
2013-01-02 Ed Schonberg <schonberg@adacore.com>
* sem_ch8.adb (Analyze_Primitive_Renamed_Operation): The prefixed
view of a subprogram has convention Intrnnsic, and a renaming
of a prefixed view cannot be the prefix of an Access attribute.
2013-01-02 Robert Dewar <dewar@adacore.com>
* restrict.adb: Minor reformatting.
From-SVN: r194782
Diffstat (limited to 'gcc/ada/restrict.adb')
| -rw-r--r-- | gcc/ada/restrict.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/restrict.adb b/gcc/ada/restrict.adb index 14ab452..84e576b 100644 --- a/gcc/ada/restrict.adb +++ b/gcc/ada/restrict.adb @@ -611,8 +611,8 @@ package body Restrict is end if; -- Ignore call if node N is not in the main source unit, since we only - -- give messages for . This avoids giving messages for aspects that are - -- specified in withed units. + -- give messages for the main unit. This avoids giving messages for + -- aspects that are specified in withed units. if not In_Extended_Main_Source_Unit (N) then return; |