* trans-array.c (gfc_conv_array_parameter): Initialize tmp.

From-SVN: r125313

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index f761f5669334e2a1ff9b4ae6dbed99e46775884b..52e995a0ffa1383bdfda16290be0a83bd9130934 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+2007-06-04  Steve Ellcey  <sje@cup.hp.com>
+
+       * trans-array.c (gfc_conv_array_parameter): Initialize tmp.
+
 2007-05-31  Richard Guenther  <rguenther@suse.de>
 
        * trans-expr.c (gfc_conv_expr_op): Use zero constant

diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c
index b85819e0365950ddf31ca2e29c723fac83b6e16c..08ce1444c8b7460f4f0822e60fadcb90c016e661 100644 (file)
--- a/gcc/fortran/trans-array.c
+++ b/gcc/fortran/trans-array.c
@@ -4819,7 +4819,7 @@ gfc_conv_array_parameter (gfc_se * se, gfc_expr * expr, gfc_ss * ss, int g77)
 {
   tree ptr;
   tree desc;
-  tree tmp;
+  tree tmp = NULL_TREE;
   tree stmt;
   tree parent = DECL_CONTEXT (current_function_decl);
   bool full_array_var, this_array_result;