This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug fortran/20866] recursively defined statement function



------- Comment #3 from cvs-commit at gcc dot gnu dot org  2005-10-17 20:52 -------
Subject: Bug 20866

CVSROOT:        /cvs/gcc
Module name:    gcc
Changes by:     pault@gcc.gnu.org       2005-10-17 20:52:37

Modified files:
        gcc/fortran    : ChangeLog gfortran.h resolve.c expr.c decl.c 
                         match.c 
        gcc/testsuite  : ChangeLog 
Added files:
        gcc/testsuite/gfortran.dg: host_dummy_index_1.f90 
                                   automatic_char_len_2.f90 
                                   recursive_statement_functions.f90 
                                   assumed_size_dt_dummy.f90 
                                   external_initializer.f90 
                                   non_module_public.f90 

Log message:
        2005-10-17  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/23446
        * gfortran.h: Primitive for gfc_is_formal_arg.
        * resolve.c(gfc_is_formal_arg): New function to signal across
        several function calls that formal argument lists are being
        processed.
        (resolve_formal_arglist): Set/reset the flag for gfc_is_formal_arg.
        *expr.c(check_restricted): Add check, via gfc_is_formal_arg, if
        symbol is part of an formal argument declaration.

        PR fortran/21459
        * decl.c (add_init_expr_to_sym): Make a new character
        length for each variable, when the expression is NULL
        and link to cl_list.

        PR fortran/20866
        * match.c (recursive_stmt_fcn): New function that tests if
        a statement function resurses through itself or other other
        statement functions.
        (gfc_match_st_function): Call recursive_stmt_fcn to check
        if this is recursive and to raise error if so.

        PR fortran/20849
        PR fortran/20853
        * resolve.c (resolve_symbol): Errors for assumed size arrays
        with default initializer and for external objects with an
        initializer.

        PR fortran/20837
        * decl.c (match_attr_spec): Prevent PUBLIC from being used
        outside a module.

        2005-10-17  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/23446
        * gfortran.dg/host_dummy_index_1.f90: New test.

        PR fortran/21459
        gfortran.dg/automatic_char_len_2.f90: New test.

        PR fortran/20866
        gfortran.dg/recursive_statement_functions.f90: New test.

        PR fortran/20853
        gfortran.dg/assumed_size_dt_dummy.f90: New test.

        PR fortran/20849
        gfortran.dg/external_initializer.f90: New test.

        PR fortran/20837
        non_module_public.f90: New test.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&r1=1.587&r2=1.588
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/gfortran.h.diff?cvsroot=gcc&r1=1.89&r2=1.90
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/resolve.c.diff?cvsroot=gcc&r1=1.59&r2=1.60
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/expr.c.diff?cvsroot=gcc&r1=1.30&r2=1.31
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/decl.c.diff?cvsroot=gcc&r1=1.42&r2=1.43
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/match.c.diff?cvsroot=gcc&r1=1.46&r2=1.47
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.6205&r2=1.6206
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/host_dummy_index_1.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/automatic_char_len_2.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/recursive_statement_functions.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/assumed_size_dt_dummy.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/external_initializer.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/non_module_public.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1


-- 


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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]