This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/37779] Missing RECURSIVE not detected
- From: "domob at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 30 Nov 2008 20:37:33 -0000
- Subject: [Bug fortran/37779] Missing RECURSIVE not detected
- References: <bug-37779-13404@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #5 from domob at gcc dot gnu dot org 2008-11-30 20:37 -------
Subject: Bug 37779
Author: domob
Date: Sun Nov 30 20:36:10 2008
New Revision: 142299
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=142299
Log:
2008-11-30 Daniel Kraft <d@domob.eu>
PR fortran/37779
* gfortran.h (struct gfc_entry_list): Fixed typo in comment.
* resolve.c (is_illegal_recursion): New method.
(resolve_procedure_expression): Use new is_illegal_recursion instead of
direct check and handle function symbols correctly.
(resolve_actual_arglist): Removed useless recursion check.
(resolve_function): Use is_illegal_recursion instead of direct check.
(resolve_call): Ditto.
2008-11-30 Daniel Kraft <d@domob.eu>
PR fortran/37779
* gfortran.dg/recursive_check_1.f: Changed expected error message to
the more general new one.
* gfortran.dg/recursive_check_2.f90: Ditto.
* gfortran.dg/entry_18.f90: Ditto.
* gfortran.dg/recursive_check_4.f03: Do "the same" check also for
FUNCTIONS, as this is different in details from SUBROUTINES.
* gfortran.dg/recursive_check_6.f03: New test.
Added:
trunk/gcc/testsuite/gfortran.dg/recursive_check_6.f03
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/gfortran.h
trunk/gcc/fortran/resolve.c
trunk/gcc/testsuite/ChangeLog
trunk/gcc/testsuite/gfortran.dg/entry_18.f90
trunk/gcc/testsuite/gfortran.dg/recursive_check_1.f
trunk/gcc/testsuite/gfortran.dg/recursive_check_2.f90
trunk/gcc/testsuite/gfortran.dg/recursive_check_4.f03
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37779