From: Paul Thomas <pault@gcc.gnu.org>
Date: Tue, 12 Jun 2007 06:54:42 +0000 (+0000)
Subject: trans-common.c (create_common): Initialize 'field_init'.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=f84c7ed94694125c633be09bedb477cfac3a7f46;p=gcc.git

trans-common.c (create_common): Initialize 'field_init'.

2007-06-12  Paul Thomas  <pault@gcc.gnu.org>

	* trans-common.c (create_common): Initialize 'field_init'.

From-SVN: r125640
---

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index bb56decbe8b..6a5f0cb7f7a 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+2007-06-12  Paul Thomas  <pault@gcc.gnu.org>
+
+	* trans-common.c (create_common): Initialize 'field_init'.
+
 2007-06-12  Paul Thomas  <pault@gcc.gnu.org>
 
 	PR fortran/29786
diff --git a/gcc/fortran/trans-common.c b/gcc/fortran/trans-common.c
index e39ec5962a0..afcbb1c52c0 100644
--- a/gcc/fortran/trans-common.c
+++ b/gcc/fortran/trans-common.c
@@ -528,7 +528,7 @@ create_common (gfc_common_head *com, segment_info *head, bool saw_equiv)
   tree union_type;
   tree *field_link;
   tree field;
-  tree field_init;
+  tree field_init = NULL_TREE;
   record_layout_info rli;
   tree decl;
   bool is_init = false;