From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 12949 invoked by alias); 4 Oct 2011 20:44:31 -0000 Received: (qmail 12939 invoked by uid 22791); 4 Oct 2011 20:44:31 -0000 X-SWARE-Spam-Status: No, hits=-2.9 required=5.0 tests=ALL_TRUSTED,AWL,BAYES_00 X-Spam-Check-By: sourceware.org Received: from localhost (HELO gcc.gnu.org) (127.0.0.1) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Tue, 04 Oct 2011 20:44:17 +0000 From: "janus at gcc dot gnu.org" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/48706] Type extension inside subroutine Date: Tue, 04 Oct 2011 20:44:00 -0000 X-Bugzilla-Reason: CC X-Bugzilla-Type: changed X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gcc X-Bugzilla-Component: fortran X-Bugzilla-Keywords: ice-on-valid-code X-Bugzilla-Severity: normal X-Bugzilla-Who: janus at gcc dot gnu.org X-Bugzilla-Status: RESOLVED X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: janus at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Changed-Fields: Message-ID: In-Reply-To: References: X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/ Auto-Submitted: auto-generated Content-Type: text/plain; charset="UTF-8" MIME-Version: 1.0 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: 2011-10/txt/msg00216.txt.bz2 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=48706 --- Comment #9 from janus at gcc dot gnu.org 2011-10-04 20:44:14 UTC --- Author: janus Date: Tue Oct 4 20:44:10 2011 New Revision: 179524 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=179524 Log: 2011-10-04 Janus Weil PR fortran/48706 * module.c (write_dt_extensions): Do not write extended types which are local to a subroutine. 2011-10-04 Janus Weil PR fortran/48706 * gfortran.dg/extends_12.f03: New. Added: branches/gcc-4_6-branch/gcc/testsuite/gfortran.dg/extends_12.f03 Modified: branches/gcc-4_6-branch/gcc/fortran/ChangeLog branches/gcc-4_6-branch/gcc/fortran/module.c branches/gcc-4_6-branch/gcc/testsuite/ChangeLog