This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [Patch, Fortran, F08] PR 49562: [4.6/4.7 Regression] [OOP] assigning value to type-bound function
- From: Janus Weil <janus at gcc dot gnu dot org>
- To: gfortran <fortran at gcc dot gnu dot org>, gcc-patches <gcc-patches at gcc dot gnu dot org>
- Date: Fri, 1 Jul 2011 16:28:54 +0200
- Subject: Re: [Patch, Fortran, F08] PR 49562: [4.6/4.7 Regression] [OOP] assigning value to type-bound function
- References: <BANLkTi=yQDZZMgPU1piEiQuoMZbVkeiXmQ@mail.gmail.com>
Ping ... !
2011/6/28 Janus Weil <janus@gcc.gnu.org>:
> 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 ?Janus Weil ?<janus@gcc.gnu.org>
>
> ? ? ? ?PR fortran/49562
> ? ? ? ?* expr.c (gfc_check_vardef_context): Handle type-bound procedures.
>
>
> 2011-06-28 ?Janus Weil ?<janus@gcc.gnu.org>
>
> ? ? ? ?PR fortran/49562
> ? ? ? ?* gfortran.dg/typebound_proc_23.f90: New.
>