summaryrefslogtreecommitdiff
path: root/gcc/ada/ali.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/ali.ads')
-rw-r--r--gcc/ada/ali.ads9
1 files changed, 6 insertions, 3 deletions
diff --git a/gcc/ada/ali.ads b/gcc/ada/ali.ads
index ab15ca11f3f..0a808179fde 100644
--- a/gcc/ada/ali.ads
+++ b/gcc/ada/ali.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992-2010, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2011, 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- --
@@ -24,8 +24,8 @@
------------------------------------------------------------------------------
-- This package defines the internal data structures used for representation
--- of Ada Library Information (ALI) acquired from the ALI files generated
--- by the front end.
+-- of Ada Library Information (ALI) acquired from the ALI files generated by
+-- the front end.
with Casing; use Casing;
with Gnatvsn; use Gnatvsn;
@@ -372,6 +372,9 @@ package ALI is
Optimize_Alignment : Character;
-- Optimize_Alignment setting. Set to L/S/T/O for OL/OS/OT/OO present
+ Has_Finalizer : Boolean;
+ -- Indicates whether a package body or a spec has a library-level
+ -- finalization routine.
end record;
package Units is new Table.Table (