* module.c (mio_f2k_derived): Initialize cur.
From-SVN: r148144
This commit is contained in:
parent
19d892fdb3
commit
c75b7ed799
2 changed files with 5 additions and 1 deletions
|
@ -1,3 +1,7 @@
|
|||
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
|
||||
|
|
|
@ -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;
|
||||
|
|
Loading…
Add table
Reference in a new issue