aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/symbol.c
diff options
context:
space:
mode:
authorMikael Morin <mikael@gcc.gnu.org>2010-10-06 15:21:00 +0000
committerMikael Morin <mikael@gcc.gnu.org>2010-10-06 15:21:00 +0000
commit4f2b3d28a20053d20018732227a7865e33582f2d (patch)
tree5ffb20535cf1d99a1082a8e8c6f7cf06dabb09d1 /gcc/fortran/symbol.c
parent9231ff56b1aa73bb82e02cc513c6e3ba8a3c2b00 (diff)
downloadgcc-4f2b3d28a20053d20018732227a7865e33582f2d.zip
gcc-4f2b3d28a20053d20018732227a7865e33582f2d.tar.gz
gcc-4f2b3d28a20053d20018732227a7865e33582f2d.tar.bz2
symbol.c (free_components): Free list of formal args and formal namespace.
2010-10-06 Mikael Morin <mikael@gcc.gnu.org> * symbol.c (free_components): Free list of formal args and formal namespace. From-SVN: r165037
Diffstat (limited to 'gcc/fortran/symbol.c')
-rw-r--r--gcc/fortran/symbol.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/fortran/symbol.c b/gcc/fortran/symbol.c
index cd07b63..b06afe4 100644
--- a/gcc/fortran/symbol.c
+++ b/gcc/fortran/symbol.c
@@ -2049,6 +2049,9 @@ free_components (gfc_component *p)
gfc_free_array_spec (p->as);
gfc_free_expr (p->initializer);
+ gfc_free_formal_arglist (p->formal);
+ gfc_free_namespace (p->formal_ns);
+
gfc_free (p);
}
}