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

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
f84c7ed9 · Paul Thomas · a472f546 · f84c7ed9 · f84c7ed9
Commit f84c7ed9 authored Jun 12, 2007 by Paul Thomas
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletions

gcc/fortran/ChangeLog
+4 -0

gcc/fortran/trans-common.c
+1 -1

No files found.
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
 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
 	PR fortran/30875
 	* trans-common.c (get_init_field): New function.

--- 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;