From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 2862 invoked by alias); 5 Dec 2012 15:46:23 -0000 Received: (qmail 2846 invoked by uid 22791); 5 Dec 2012 15:46:21 -0000 X-SWARE-Spam-Status: No, hits=-2.1 required=5.0 tests=AWL,BAYES_00,RCVD_IN_DNSWL_NONE X-Spam-Check-By: sourceware.org Received: from mx02.qsc.de (HELO mx02.qsc.de) (213.148.130.14) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Wed, 05 Dec 2012 15:45:50 +0000 Received: from archimedes.net-b.de (port-92-195-66-45.dynamic.qsc.de [92.195.66.45]) by mx02.qsc.de (Postfix) with ESMTP id 11E052517E; Wed, 5 Dec 2012 16:45:48 +0100 (CET) Message-ID: <50BF6C2C.7090509@net-b.de> Date: Wed, 05 Dec 2012 15:46:00 -0000 From: Tobias Burnus User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:17.0) Gecko/17.0 Thunderbird/17.0 MIME-Version: 1.0 To: gcc patches , gfortran Subject: [Patch, Fortran, committed] Fix memleak in generate_component_assignments Content-Type: multipart/mixed; boundary="------------060605040909000306020701" Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org X-SW-Source: 2012-12/txt/msg00322.txt.bz2 This is a multi-part message in MIME format. --------------060605040909000306020701 Content-Type: text/plain; charset=ISO-8859-15; format=flowed Content-Transfer-Encoding: 7bit Content-length: 95 Found by Coverity's scanner. Committed as Rev. 194225 after building with the patch. Tobias --------------060605040909000306020701 Content-Type: text/x-patch; name="committed.diff" Content-Transfer-Encoding: 7bit Content-Disposition: attachment; filename="committed.diff" Content-length: 789 Index: ChangeLog =================================================================== --- ChangeLog (Revision 194224) +++ ChangeLog (Arbeitskopie) @@ -1,3 +1,7 @@ +2012-12-05 Tobias Burnus + + * resolve.c (generate_component_assignments): Fix memleak. + 2012-12-03 Janus Weil PR fortran/55548 Index: resolve.c =================================================================== --- resolve.c (Revision 194224) +++ resolve.c (Arbeitskopie) @@ -9857,7 +9857,6 @@ generate_component_assignments (gfc_code **code, g 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); --------------060605040909000306020701--