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

gcc/fortran/ChangeLog

+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.

gcc/fortran/resolve.c

@@ -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)