From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 26194 invoked by alias); 1 Oct 2010 15:17:35 -0000 Received: (qmail 26183 invoked by uid 22791); 1 Oct 2010 15:17:34 -0000 X-SWARE-Spam-Status: No, hits=2.2 required=5.0 tests=AWL,BAYES_50,SPF_NEUTRAL,TW_JV,T_RP_MATCHES_RCVD X-Spam-Check-By: sourceware.org Received: from smtp24.services.sfr.fr (HELO smtp24.services.sfr.fr) (93.17.128.82) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Fri, 01 Oct 2010 15:17:29 +0000 Received: from filter.sfr.fr (localhost [127.0.0.1]) by msfrf2406.sfr.fr (SMTP Server) with ESMTP id 70C14700008F for ; Fri, 1 Oct 2010 17:17:27 +0200 (CEST) Received: from gimli.local (99.123.193-77.rev.gaoland.net [77.193.123.99]) by msfrf2406.sfr.fr (SMTP Server) with ESMTP id 37A12700008C for ; Fri, 1 Oct 2010 17:17:27 +0200 (CEST) X-SFR-UUID: 20101001151727227.37A12700008C@msfrf2406.sfr.fr From: Mikael Morin To: gcc-bugs@gcc.gnu.org Subject: Re: [Bug fortran/45827] mio_component_ref(): Component not found when mixing f90 and f03 in large projects Date: Fri, 01 Oct 2010 15:17:00 -0000 User-Agent: KMail/1.13.5 (FreeBSD/8.0-STABLE; KDE/4.5.1; amd64; ; ) References: <20101001143948.D63711C0008C@msfrf2419.sfr.fr> In-Reply-To: <20101001143948.D63711C0008C@msfrf2419.sfr.fr> MIME-Version: 1.0 Content-Type: Text/Plain; charset="utf-8" Content-Transfer-Encoding: 7bit Message-Id: <201010011717.22077.mikael.morin@sfr.fr> X-IsSubscribed: yes Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org X-SW-Source: 2010-10/txt/msg00147.txt.bz2 On Friday 01 October 2010 16:39:35 jvdelisle at gcc dot gnu.org wrote: > 2010-10-01 14:39:23 UTC --- This look suspicious: valgrind on f951 > No, it is unrelated. It happens on the most simple testcases like: !!!! end !!!! It can be circumvented by the following patch. But it is harmless (unreleased memory). --- a/cpp.c +++ b/cpp.c @@ -510,10 +510,11 @@ gfc_cpp_post_options (void) || gfc_cpp_option.dump_includes)) gfc_fatal_error("To enable preprocessing, use -cpp"); - cpp_in = cpp_create_reader (CLK_GNUC89, NULL, line_table); if (!gfc_cpp_enabled ()) return; + cpp_in = cpp_create_reader (CLK_GNUC89, NULL, line_table); + gcc_assert (cpp_in); /* The cpp_options-structure defines far more flags than those set here.