summaryrefslogtreecommitdiffstats
path: root/gcc/ada/a-cbhase.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2011-08-29 14:17:49 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2011-08-29 14:17:49 +0000
commit00447a62af3e0d56871c88c7921bd70399ede3a8 (patch)
tree7b318b0aa2d40b866a94d8f0cc5cb527c26fafb2 /gcc/ada/a-cbhase.ads
parentc9c6fcb0403547b5d2796667389247a9a5783e7f (diff)
downloadppe42-gcc-00447a62af3e0d56871c88c7921bd70399ede3a8.tar.gz
ppe42-gcc-00447a62af3e0d56871c88c7921bd70399ede3a8.zip
2011-08-29 Robert Dewar <dewar@adacore.com>
* sem_ch3.adb, sem_util.adb, gnat1drv.adb, s-parint.ads: Minor reformatting. 2011-08-29 Matthew Heaney <heaney@adacore.com> * a-cbhama.ads, a-cbhase.ads (Cursor): Default-initialize all components of record type. 2011-08-29 Bob Duff <duff@adacore.com> * s-tassta.adb (Task_Wrapper): Handle and ignore exceptions propagated by the termination handler. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@178241 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-cbhase.ads')
-rw-r--r--gcc/ada/a-cbhase.ads4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/a-cbhase.ads b/gcc/ada/a-cbhase.ads
index 9618ff3087e..4f3ea3107f9 100644
--- a/gcc/ada/a-cbhase.ads
+++ b/gcc/ada/a-cbhase.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 2004-2010, Free Software Foundation, Inc. --
+-- Copyright (C) 2004-2011, Free Software Foundation, Inc. --
-- --
-- This specification is derived from the Ada Reference Manual for use with --
-- GNAT. The copyright notice above, and the license provisions that follow --
@@ -431,7 +431,7 @@ private
type Cursor is record
Container : Set_Access;
- Node : Count_Type;
+ Node : Count_Type := 0;
end record;
procedure Write
OpenPOWER on IntegriCloud