diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-10-14 15:12:32 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-10-14 15:12:32 +0000 |
commit | 496b8337d4f5c335672ec74e0091cae1d93f3aac (patch) | |
tree | 02125b4345c859f5b221e69d9ab34f3d02c614f8 /gcc/ada/s-rident.ads | |
parent | 4085c23a575cb89816280cd355c348862cc289d8 (diff) | |
download | gcc-496b8337d4f5c335672ec74e0091cae1d93f3aac.tar.gz |
2011-10-14 Ed Schonberg <schonberg@adacore.com>
* exp_disp.adb (Check_Premature_Freezing): If an untagged type
is a generic actual, it is a subtype of a type that was frozen
by the instantiation, and even if not marked frozen it does not
affect the construction of the dispatch table.
2011-10-14 Robert Dewar <dewar@adacore.com>
* make.adb, mlib-utl.adb, sem_util.adb, sem_ch4.adb: Minor code
reformatting.
* s-rident.ads: Add missing Compiler_Unit pragma.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@179989 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-rident.ads')
-rw-r--r-- | gcc/ada/s-rident.ads | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/s-rident.ads b/gcc/ada/s-rident.ads index dd9ef16b22c..1c306e34664 100644 --- a/gcc/ada/s-rident.ads +++ b/gcc/ada/s-rident.ads @@ -41,6 +41,8 @@ -- so we can do the instantiation under control of Discard_Names to remove -- the tables. +pragma Compiler_Unit; + generic package System.Rident is pragma Preelaborate; |