diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-02-17 14:56:55 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-02-17 14:56:55 +0100 |
| commit | 260359e35de7fcc0d7746cdc3983857fba1b9f7a (patch) | |
| tree | e139ece8778dadcfdec61d440ca2acd7abacbab4 /gcc/ada/sem_res.adb | |
| parent | bae868fba9ff95c0f9d6f8bd2d578592f8714d54 (diff) | |
| download | gcc-260359e35de7fcc0d7746cdc3983857fba1b9f7a.zip gcc-260359e35de7fcc0d7746cdc3983857fba1b9f7a.tar.gz gcc-260359e35de7fcc0d7746cdc3983857fba1b9f7a.tar.bz2 | |
[multiple changes]
2012-02-17 Robert Dewar <dewar@adacore.com>
* sem_dim.adb, sem_dim.ads, s-tasren.adb, prj.adb, prj.ads, freeze.adb,
sem_res.adb, exp_ch4.adb, sinput.adb, sinput.ads, exp_aggr.adb,
exp_intr.adb, s-os_lib.adb: Minor reformatting.
2012-02-17 Ed Schonberg <schonberg@adacore.com>
* sem_ch6.adb (Is_Non_Overriding_Operation): Add warning if the
old operation is abstract, the relevant type is not abstract,
and the new subprogram fails to override.
From-SVN: r184336
Diffstat (limited to 'gcc/ada/sem_res.adb')
| -rw-r--r-- | gcc/ada/sem_res.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_res.adb b/gcc/ada/sem_res.adb index 3d693e0..1b2eef0 100644 --- a/gcc/ada/sem_res.adb +++ b/gcc/ada/sem_res.adb @@ -4239,8 +4239,8 @@ package body Sem_Res is and then Nkind (Expression (E)) = N_Function_Call then declare - Pool : constant Entity_Id - := Associated_Storage_Pool (Root_Type (Typ)); + Pool : constant Entity_Id := + Associated_Storage_Pool (Root_Type (Typ)); begin if Present (Pool) and then |