summaryrefslogtreecommitdiff
path: root/gcc/ada/s-finmas.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2015-10-16 13:03:16 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2015-10-16 13:03:16 +0000
commitb2e821de7f4f98cc3795d9dd4d503cd19d61e307 (patch)
tree221d3dce05efe75a58cbe161a4ebfe8f60882c33 /gcc/ada/s-finmas.ads
parentd28127131461c1716359c43cf398859f4628a21d (diff)
downloadgcc-b2e821de7f4f98cc3795d9dd4d503cd19d61e307.tar.gz
2015-10-16 Eric Botcazou <ebotcazou@adacore.com>
* a-tags.ads (Parent_Size): Remove obsolete pragma Export. * s-finmas.ads (Header_Offset): Delete. * s-finmas.adb (Header_Offset): Likewise. (Finalize): Call Header_Size instead of Header_Offset. * s-stposu.adb (Allocate_Any_Controlled): Likewise. (Deallocate_Any_Controlled): Likewise. 2015-10-16 Arnaud Charlet <charlet@adacore.com> * a-exetim.ads, a-exetim-mingw.ads, a-exetim-default.ads: Whitespace cleanup. * s-osprim-mingw.adb, einfo.ads, sem_util.adb, sem_util.ads, sem_ch4.adb, sem_ch13.adb, s-trasym.adb, s-trasym.ads, s-taprop-posix.adb: Minor reformatting. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@228895 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-finmas.ads')
-rw-r--r--gcc/ada/s-finmas.ads5
1 files changed, 1 insertions, 4 deletions
diff --git a/gcc/ada/s-finmas.ads b/gcc/ada/s-finmas.ads
index a94a8f99b60..a4e6cb15e48 100644
--- a/gcc/ada/s-finmas.ads
+++ b/gcc/ada/s-finmas.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 2011-2013, Free Software Foundation, Inc. --
+-- Copyright (C) 2011-2015, 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- --
@@ -111,9 +111,6 @@ package System.Finalization_Masters is
function Finalization_Started (Master : Finalization_Master) return Boolean;
-- Return the finalization status of a master
- function Header_Offset return System.Storage_Elements.Storage_Offset;
- -- Return the size of type FM_Node as Storage_Offset
-
function Header_Size return System.Storage_Elements.Storage_Count;
-- Return the size of type FM_Node as Storage_Count