aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/lib-writ.ads
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2010-06-22 12:07:05 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2010-06-22 12:07:05 +0200
commit47d3b920ce09b27fca7dc6504640f6fe72fb16cf (patch)
tree817abe2e078de21d449193162217e6853732d04c /gcc/ada/lib-writ.ads
parent5c52bf3ba490639455d1ce816c2b2004bd3c65da (diff)
downloadgcc-47d3b920ce09b27fca7dc6504640f6fe72fb16cf.zip
gcc-47d3b920ce09b27fca7dc6504640f6fe72fb16cf.tar.gz
gcc-47d3b920ce09b27fca7dc6504640f6fe72fb16cf.tar.bz2
[multiple changes]
2010-06-22 Robert Dewar <dewar@adacore.com> * lib-writ.ads, errout.adb, einfo.adb, einfo.ads: Minor reformatting. 2010-06-22 Vincent Celier <celier@adacore.com> * adaint.c (__gnat_locate_regular_file): If a directory in the path is empty, make it the current working directory. 2010-06-22 Thomas Quinot <quinot@adacore.com> * sem_ch3.adb (Build_Derived_Record_Type): When deriving a tagged private type with discriminants, make sure the parent type is frozen. 2010-06-22 Eric Botcazou <ebotcazou@adacore.com> * exp_attr.adb (Expand_N_Attribute_Reference) <Attribute_Bit>: Deal with packed array references specially. * exp_ch4.adb (Expand_N_Indexed_Component): Do not convert a reference to a component of a bit packed array if it is the prefix of 'Bit. * exp_pakd.ads (Expand_Packed_Bit_Reference): Declare. * exp_pakd.adb (Expand_Packed_Bit_Reference): New procedure. Expand a 'Bit reference, where the prefix involves a packed array reference. (Get_Base_And_Bit_Offset): New helper, extracted from... (Expand_Packed_Address_Reference): ...here. Call above procedure to get the outer object and offset expression. From-SVN: r161160
Diffstat (limited to 'gcc/ada/lib-writ.ads')
-rw-r--r--gcc/ada/lib-writ.ads11
1 files changed, 5 insertions, 6 deletions
diff --git a/gcc/ada/lib-writ.ads b/gcc/ada/lib-writ.ads
index 8e8e321..5451432 100644
--- a/gcc/ada/lib-writ.ads
+++ b/gcc/ada/lib-writ.ads
@@ -696,14 +696,13 @@ package Lib.Writ is
-- reference data. See the spec of Par_SCO for full details of the format.
----------------------
- -- Global variables --
+ -- Global Variables --
----------------------
- -- The table structure defined here stores one entry for each
- -- Interrupt_State pragma encountered either in the main source or
- -- in an ancillary with'ed source. Since interrupt state values
- -- have to be consistent across all units in a partition, we may
- -- as well detect inconsistencies at compile time when we can.
+ -- The table defined here stores one entry for each Interrupt_State pragma
+ -- encountered either in the main source or in an ancillary with'ed source.
+ -- Since interrupt state values have to be consistent across all units in a
+ -- partition, we detect inconsistencies at compile time when we can.
type Interrupt_State_Entry is record
Interrupt_Number : Pos;