* module.c (mio_f2k_derived): Initialize cur.

From-SVN: r148144

* module.c (mio_f2k_derived): Initialize cur.
From-SVN: r148144
c75b7ed7 · Alexandre Oliva · Alexandre Oliva · 19d892fd · c75b7ed7 · c75b7ed7
Commit c75b7ed7 authored Jun 03, 2009 by Alexandre Oliva Committed by Alexandre Oliva Jun 03, 2009
Show whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletions

gcc/fortran/ChangeLog
+4 -0

gcc/fortran/module.c
+1 -1

No files found.
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
+2009-06-03  Alexandre Oliva  <aoliva@redhat.com>
+	* module.c (mio_f2k_derived): Initialize cur.
 2009-06-01  Tobias Burnus  <burnus@net-b.de>
 	PR fortran/40309

--- a/gcc/fortran/module.c
+++ b/gcc/fortran/module.c
@@ -3340,7 +3340,7 @@ mio_f2k_derived (gfc_namespace *f2k)
      f2k->finalizers = NULL;
      while (peek_atom () != ATOM_RPAREN)
 	{
-	  gfc_finalizer *cur;
+	  gfc_finalizer *cur = NULL;
 	  mio_finalizer (&cur);
 	  cur->next = f2k->finalizers;
 	  f2k->finalizers = cur;