git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

re PR fortran/41613 (ICE for gfortran.dg/dynamic_dispatch_*.f03 on powerpc-apple-darwin) 

2009-10-07  Paul Thomas <pault@gcc.gnu.org>

        PR fortran/41613
        * resolve.c (check_class_members): Reset compcall.assign.

From-SVN: r152513
This commit is contained in:
Paul Thomas 2009-10-07 05:17:29 +00:00
parent 66af41878b
commit 28fccf2c73
2 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/fortran/ChangeLog
View File

@ -1,3 +1,8 @@
2009-10-07 Paul Thomas <pault@gcc.gnu.org>
PR fortran/41613
* resolve.c (check_class_members): Reset compcall.assign.
2009-10-05 Paul Thomas <pault@gcc.gnu.org>
* trans-expr.c (select_class_proc): New function.

5
gcc/fortran/resolve.c
View File

@ -5132,6 +5132,11 @@ check_class_members (gfc_symbol *derived)
e->value.compcall.tbp = tbp->n.tb;
e->value.compcall.name = tbp->name;
/* Let the original expresssion catch the assertion in
resolve_compcall, since this flag does not appear to be reset or
copied in some systems. */
e->value.compcall.assign = 0;
/* Do the renaming, PASSing, generic => specific and other
good things for each class member. */
class_try = (resolve_compcall (e, fcn_flag) == SUCCESS)