diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-29 12:44:14 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-29 12:44:14 +0200 |
| commit | 646e2823137ee4f66ce92a6cf9947e308526de00 (patch) | |
| tree | 1a0e7117535e8dcb9ba10bf3e740ec4930054e94 /gcc/ada/sem_ch7.adb | |
| parent | 5d59eef2697a46611385b025252447b6117578b6 (diff) | |
| download | gcc-646e2823137ee4f66ce92a6cf9947e308526de00.zip gcc-646e2823137ee4f66ce92a6cf9947e308526de00.tar.gz gcc-646e2823137ee4f66ce92a6cf9947e308526de00.tar.bz2 | |
[multiple changes]
2011-08-29 Thomas Quinot <quinot@adacore.com>
* sinfo.ads, sem_ch7.adb: Minor reformatting.
2011-08-29 Bob Duff <duff@adacore.com>
* sem_ch4.adb (Analyze_Allocator): Check No_Nested_Finalization
restriction on allocators, as required by AI05-0013-1.
* restrict.ads: Minor comment fix.
From-SVN: r178198
Diffstat (limited to 'gcc/ada/sem_ch7.adb')
| -rw-r--r-- | gcc/ada/sem_ch7.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/sem_ch7.adb b/gcc/ada/sem_ch7.adb index 471d0f8..8cf1170 100644 --- a/gcc/ada/sem_ch7.adb +++ b/gcc/ada/sem_ch7.adb @@ -1195,7 +1195,8 @@ package body Sem_Ch7 is while Present (E) loop -- Check on incomplete types - -- AI05-213 : a formal incomplete type has no completion. + + -- AI05-0213: a formal incomplete type has no completion if Ekind (E) = E_Incomplete_Type and then No (Full_View (E)) |