diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-09-06 11:51:24 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-09-06 11:51:24 +0200 |
| commit | c23c86bb171edf47767dbc56545c0b535b526c5b (patch) | |
| tree | a55fd8a82fe22b7605e7c9fe9025fbb807d74577 /gcc/ada/sem_ch3.adb | |
| parent | 6376a3c640009ed25a250d677fc7ff0fdd0a2c1c (diff) | |
| download | gcc-c23c86bb171edf47767dbc56545c0b535b526c5b.zip gcc-c23c86bb171edf47767dbc56545c0b535b526c5b.tar.gz gcc-c23c86bb171edf47767dbc56545c0b535b526c5b.tar.bz2 | |
[multiple changes]
2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
* sem_ch3.adb, sem_ch7.adb, sem_util.adb, g-debpoo.adb, sem_ch4.adb,
sem_ch6.adb, sem_ch8.adb: Minor reformatting.
* exp_util.adb (Is_Source_Object): Account for
the cases where the source object may appear as a dereference
or within a type conversion.
* exp_ch6.adb: Fix missing space in error message.
2017-09-06 Ed Schonberg <schonberg@adacore.com>
* sem_prag.adb: Update description of Eliminate.
From-SVN: r251762
Diffstat (limited to 'gcc/ada/sem_ch3.adb')
| -rw-r--r-- | gcc/ada/sem_ch3.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb index 93a2c89..7929f02 100644 --- a/gcc/ada/sem_ch3.adb +++ b/gcc/ada/sem_ch3.adb @@ -20785,7 +20785,7 @@ package body Sem_Ch3 is -- corresponding subtype of the full view. elsif Ekind (Priv_Dep) = E_Incomplete_Subtype - and then Comes_From_Source (Priv_Dep) + and then Comes_From_Source (Priv_Dep) then Set_Subtype_Indication (Parent (Priv_Dep), New_Occurrence_Of (Full_T, Sloc (Priv_Dep))); @@ -20793,8 +20793,8 @@ package body Sem_Ch3 is Set_Ekind (Priv_Dep, Subtype_Kind (Ekind (Full_T))); Set_Analyzed (Parent (Priv_Dep), False); - -- Reanalyze the declaration, suppressing the call to - -- Enter_Name to avoid duplicate names. + -- Reanalyze the declaration, suppressing the call to Enter_Name + -- to avoid duplicate names. Analyze_Subtype_Declaration (N => Parent (Priv_Dep), |