------- Comment #3 from pault at gcc dot gnu dot org 2009-10-16 06:07 ------- Subject: Bug 41648
Author: pault Date: Fri Oct 16 06:07:09 2009 New Revision: 152890 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=152890 Log: 2009-10-16 Paul Thomas <pa...@gcc.gnu.org> PR fortran/41648 PR fortran/41656 * trans-expr.c (select_class_proc): Convert the expression for the vindex, carried on the first member of the esym list. * gfortran.h : Add the vindex field to the esym_list structure. and eliminate the class_object field. * resolve.c (check_class_members): Remove the setting of the class_object field. (vindex_expr): New function. (get_class_from_expr): New function. (resolve_class_compcall): Call the above to find the ultimate class or derived component. If derived, do not generate the esym list. Add and expression for the vindex to the esym list by calling the above. (resolve_class_typebound_call): The same. 2009-10-16 Paul Thomas <pa...@gcc.gnu.org> PR fortran/41648 * gfortran.dg/dynamic_dispatch_4.f03 : New test. PR fortran/41656 * gfortran.dg/dynamic_dispatch_5.f03 : New test. Added: trunk/gcc/testsuite/gfortran.dg/dynamic_dispatch_4.f03 trunk/gcc/testsuite/gfortran.dg/dynamic_dispatch_5.f03 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/resolve.c trunk/gcc/fortran/trans-expr.c trunk/gcc/testsuite/ChangeLog -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41648
