From d07e82f92b9ec4272577e99f919dc406b44fce7a Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Wed, 5 Dec 2012 16:45:32 +0100 Subject: [PATCH] resolve.c (generate_component_assignments): Fix memleak. 2012-12-05 Tobias Burnus * resolve.c (generate_component_assignments): Fix memleak. From-SVN: r194225 --- gcc/fortran/ChangeLog | 4 ++++ gcc/fortran/resolve.c | 1 - 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 939888ef01d..344c4e4ba18 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2012-12-05 Tobias Burnus + + * resolve.c (generate_component_assignments): Fix memleak. + 2012-12-03 Janus Weil PR fortran/55548 diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 69646dee748..1c7b5fb64e1 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -9857,7 +9857,6 @@ generate_component_assignments (gfc_code **code, gfc_namespace *ns) continue; /* Make an assigment for this component. */ - this_code = gfc_get_code (); this_code = build_assignment (EXEC_ASSIGN, (*code)->expr1, (*code)->expr2, comp1, comp2, (*code)->loc); -- 2.30.2