summaryrefslogtreecommitdiff
path: root/gcc/ada/ali-util.adb
diff options
context:
space:
mode:
authorbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>2001-10-30 21:16:50 +0000
committerbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>2001-10-30 21:16:50 +0000
commitca188295af5aaed051087b5cbf9f92e8d742dad5 (patch)
treec0b3deed66bc4091f9be0dbe6d916285a650cc86 /gcc/ada/ali-util.adb
parented7f48c30558bca0e660b9c6a75441b43d252a99 (diff)
downloadgcc-ca188295af5aaed051087b5cbf9f92e8d742dad5.tar.gz
* ali-util.adb (Initialize_Checksum): Use out-mode instead of in out.
Found due to GCC 3.0 warning of using uninitialized value. * layout.adb: (Get_Max_Size): Use variant record for tracking value/expression. Makes logic clearer and prevents warnings for uninitialized variables. (Layout_Array_Type): Use variant record for tracking value/expression. Makes logic clearer and prevents warnings for uninitialized variables. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@46652 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/ali-util.adb')
-rw-r--r--gcc/ada/ali-util.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/ali-util.adb b/gcc/ada/ali-util.adb
index 0e0ded9ac7c..6b1829d067f 100644
--- a/gcc/ada/ali-util.adb
+++ b/gcc/ada/ali-util.adb
@@ -50,7 +50,7 @@ package body ALI.Util is
-- generate code, so it is not necessary to worry about making the right
-- sequence of calls in any error situation.
- procedure Initialize_Checksum (Csum : in out Word);
+ procedure Initialize_Checksum (Csum : out Word);
-- Sets initial value of Csum before any calls to Accumulate_Checksum
-------------------------
@@ -286,7 +286,7 @@ package body ALI.Util is
-- Initialize_Checksum --
-------------------------
- procedure Initialize_Checksum (Csum : in out Word) is
+ procedure Initialize_Checksum (Csum : out Word) is
begin
System.CRC32.Initialize (System.CRC32.CRC32 (Csum));
end Initialize_Checksum;