[Patch, fortran] [14/22] Various minor fixups
Mikael Morin
mikael.morin@sfr.fr
Tue Oct 5 10:12:00 GMT 2010
2010-10-04 Mikael Morin <mikael@gcc.gnu.org>
* symbol.c (gfc_copy_formal_args_ppc): Free previous formal arg list
before overwriting it.
-------------- next part --------------
diff --git a/symbol.c b/symbol.c
index cd07b63..c6ce5d6 100644
--- a/symbol.c
+++ b/symbol.c
@@ -4190,6 +4190,7 @@ gfc_copy_formal_args_ppc (gfc_component *dest, gfc_symbol *src)
}
/* Add the interface to the symbol. */
+ gfc_free_formal_arglist (dest->formal);
dest->formal = head;
dest->attr.if_source = IFSRC_DECL;
More information about the Gcc-patches
mailing list