------- Comment #1 from janus at gcc dot gnu dot org  2009-08-10 09:19 -------
Subject: Bug 40940

Author: janus
Date: Mon Aug 10 09:19:24 2009
New Revision: 150620

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=150620
Log:
2009-08-10  Janus Weil  <ja...@gcc.gnu.org>

        PR fortran/40940
        * decl.c (gfc_match_type_spec): Match CLASS statement and warn about
        missing polymorphism.
        * gfortran.h (gfc_typespec): Add field 'is_class'.
        * misc.c (gfc_clear_ts): Initialize 'is_class' to zero.
        * resolve.c (type_is_extensible): New function to check if a derived
        type is extensible.
        (resolve_fl_variable_derived): Add error checks for CLASS variables.
        (resolve_typebound_procedure): Disallow non-polymorphic passed-object
        dummy arguments, turning warning into error.
        (resolve_fl_derived): Use 'type_is_extensible'. Disallow
non-polymorphic
        passed-object dummy arguments for procedure pointer components,
        turning warning into error. Add error check for CLASS components.

2009-08-10  Janus Weil  <ja...@gcc.gnu.org>

        PR fortran/40940
        * gfortran.dg/class_1.f03: New.
        * gfortran.dg/class_2.f03: New.
        * gfortran.dg/proc_ptr_comp_pass_1.f90: Use CLASS instead of TYPE.
        * gfortran.dg/proc_ptr_comp_pass_2.f90: Ditto.
        * gfortran.dg/proc_ptr_comp_pass_3.f90: Ditto.
        * gfortran.dg/typebound_call_10.f03: Ditto.
        * gfortran.dg/typebound_call_2.f03: Ditto.
        * gfortran.dg/typebound_call_3.f03: Ditto.
        * gfortran.dg/typebound_call_4.f03: Ditto.
        * gfortran.dg/typebound_generic_3.f03: Ditto.
        * gfortran.dg/typebound_generic_4.f03: Ditto.
        * gfortran.dg/typebound_proc_1.f08: Ditto.
        * gfortran.dg/typebound_proc_5.f03: Ditto.
        * gfortran.dg/typebound_proc_6.f03: Ditto.


Added:
    trunk/gcc/testsuite/gfortran.dg/class_1.f03
    trunk/gcc/testsuite/gfortran.dg/class_2.f03
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/decl.c
    trunk/gcc/fortran/gfortran.h
    trunk/gcc/fortran/misc.c
    trunk/gcc/fortran/resolve.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_pass_1.f90
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_pass_2.f90
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_pass_3.f90
    trunk/gcc/testsuite/gfortran.dg/typebound_call_10.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_call_2.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_call_3.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_call_4.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_generic_3.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_generic_4.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_proc_1.f08
    trunk/gcc/testsuite/gfortran.dg/typebound_proc_5.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_proc_6.f03


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40940

Reply via email to