diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-09 08:45:55 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-09 08:45:55 +0000 |
| commit | b67722058dd614d6c93f89dc5b0f7d4887fbecc9 (patch) | |
| tree | 220d08ad06a44452a8a5e98ccfbffb5c24b79a4a /gcc/ada/a-finali.adb | |
| parent | 98b64106c8df7a3e992237cc376bfe8f34c0f8c2 (diff) | |
| download | gcc-b67722058dd614d6c93f89dc5b0f7d4887fbecc9.tar.gz | |
2009-04-09 Robert Dewar <dewar@adacore.com>
* exp_ch4.adb (Expand_Concatenate): Improve handling of overflow cases
2009-04-09 Pascal Obry <obry@adacore.com>
* a-cihama.adb, a-cihama.ads, a-coinve.adb, a-coinve.ads,
s-tpoben.adb, s-tpoben.ads, s-finimp.adb, s-finimp.ads,
a-convec.adb, a-convec.ads, a-finali.adb, a-finali.ads,
a-filico.ads: Add some missing overriding keywords.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@145807 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-finali.adb')
| -rw-r--r-- | gcc/ada/a-finali.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/a-finali.adb b/gcc/ada/a-finali.adb index 92ba21d6422..7137e23183a 100644 --- a/gcc/ada/a-finali.adb +++ b/gcc/ada/a-finali.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 1992-2006, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2008, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -39,7 +39,7 @@ package body Ada.Finalization is -- "=" -- --------- - function "=" (A, B : Controlled) return Boolean is + overriding function "=" (A, B : Controlled) return Boolean is begin return Empty_Root_Controlled (A) = Empty_Root_Controlled (B); end "="; |