From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 19436 invoked by alias); 2 Jul 2011 12:21:19 -0000 Received: (qmail 19402 invoked by uid 22791); 2 Jul 2011 12:21:17 -0000 X-SWARE-Spam-Status: No, hits=-1.6 required=5.0 tests=AWL,BAYES_00,DKIM_SIGNED,DKIM_VALID,FREEMAIL_ENVFROM_END_DIGIT,FREEMAIL_FROM,RCVD_IN_DNSWL_LOW X-Spam-Check-By: sourceware.org Received: from mail-gw0-f47.google.com (HELO mail-gw0-f47.google.com) (74.125.83.47) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Sat, 02 Jul 2011 12:20:57 +0000 Received: by gwb11 with SMTP id 11so1867256gwb.20 for ; Sat, 02 Jul 2011 05:20:56 -0700 (PDT) MIME-Version: 1.0 Received: by 10.150.11.1 with SMTP id 1mr1460384ybk.241.1309609256814; Sat, 02 Jul 2011 05:20:56 -0700 (PDT) Received: by 10.146.83.13 with HTTP; Sat, 2 Jul 2011 05:20:56 -0700 (PDT) In-Reply-To: References: Date: Sat, 02 Jul 2011 12:21:00 -0000 Message-ID: Subject: Re: [Patch, Fortran, F08] PR 49562: [4.6/4.7 Regression] [OOP] assigning value to type-bound function From: Janus Weil To: Paul Richard Thomas Cc: gfortran , gcc-patches Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable 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: 2011-07/txt/msg00130.txt.bz2 > OK for trunk and 4.6. Thanks, Paul. Committed to trunk as r175779. Will apply to the 4.6 branch in a few days. Cheers, Janus > On Tue, Jun 28, 2011 at 5:40 PM, Janus Weil wrote: >> Hi all, >> >> here is a patch for a problem which was originally reported as an >> ICE-on-invalid regression (assigning to a type-bound function). >> >> In the course of fixing it, I noticed that it becomes valid according >> to F08 if the function is pointer-valued, and modified the patch such >> that it will accept this variant. I also adapted the original test >> case to be a run-time test of this F08 feature (in fact it is just a >> very complicated way of performing an increment from 0 to 1, and would >> still segfault without the patch). >> >> The patch was regtested on x86_64-unknown-linux-gnu. Ok for trunk and 4.= 6.2? >> >> Cheers, >> Janus >> >> >> >> 2011-06-28 =A0Janus Weil =A0 >> >> =A0 =A0 =A0 =A0PR fortran/49562 >> =A0 =A0 =A0 =A0* expr.c (gfc_check_vardef_context): Handle type-bound pr= ocedures. >> >> >> 2011-06-28 =A0Janus Weil =A0 >> >> =A0 =A0 =A0 =A0PR fortran/49562 >> =A0 =A0 =A0 =A0* gfortran.dg/typebound_proc_23.f90: New. >> > > > > -- > The knack of flying is learning how to throw yourself at the ground and m= iss. > =A0 =A0 =A0=A0 --Hitchhikers Guide to the Galaxy >