From f84c7ed94694125c633be09bedb477cfac3a7f46 Mon Sep 17 00:00:00 2001 From: Paul Thomas Date: Tue, 12 Jun 2007 06:54:42 +0000 Subject: [PATCH] trans-common.c (create_common): Initialize 'field_init'. 2007-06-12 Paul Thomas * trans-common.c (create_common): Initialize 'field_init'. From-SVN: r125640 --- gcc/fortran/ChangeLog | 4 ++++ gcc/fortran/trans-common.c | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) 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 + + * trans-common.c (create_common): Initialize 'field_init'. + 2007-06-12 Paul Thomas 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; -- 2.30.2