From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 376 invoked by alias); 1 Nov 2005 05:53:38 -0000 Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org Received: (qmail 331 invoked by alias); 1 Nov 2005 05:53:35 -0000 Date: Tue, 01 Nov 2005 05:53:00 -0000 Message-ID: <20051101055335.327.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/21565] namelist in block data is illegal In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "pault at gcc dot gnu dot org" X-SW-Source: 2005-11/txt/msg00031.txt.bz2 List-Id: ------- Comment #2 from pault at gcc dot gnu dot org 2005-11-01 05:53 ------- Subject: Bug 21565 Author: pault Date: Tue Nov 1 05:53:29 2005 New Revision: 106317 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=106317 Log: 2005-11-01 Paul Thomas PR fortran/21565 * symbol.c (check_conflict): An object cannot be in a namelist and in block data. PR fortran/18737 * resolve.c (resolve_symbol): Set the error flag to gfc_set_default_type, in the case of an external symbol, so that an error message is emitted if IMPLICIT NONE is set. PR fortran/14994 * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_SECNDS to enum. * check.c (gfc_check_secnds): New function. * intrinsic.c (add_functions): Add call to secnds. * iresolve.c (gfc_resolve_secnds): New function. * trans-intrinsic (gfc_conv_intrinsic_function): Add call to secnds via case GFC_ISYM_SECNDS. * intrinsic.texi: Add documentation for secnds. 2005-11-01 Paul Thomas PR fortran/14994 * libgfortran/intrinsics/date_and_time.c: Add interface to the functions date_and_time for the intrinsic function secnds. 2005-11-01 Paul Thomas PR fortran/21565 gfortran.dg/namelist_blockdata.f90: New test. PR fortran/18737 gfortran.dg/external_implicit_none.f90: New test. PR fortran/14994 * gfortran.dg/secnds.f: New test. Added: trunk/gcc/testsuite/gfortran.dg/external_implicit_none.f90 trunk/gcc/testsuite/gfortran.dg/namelist_blockdata.f trunk/gcc/testsuite/gfortran.dg/secnds.f Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/check.c trunk/gcc/fortran/gfortran.h trunk/gcc/fortran/intrinsic.c trunk/gcc/fortran/intrinsic.h trunk/gcc/fortran/intrinsic.texi trunk/gcc/fortran/iresolve.c trunk/gcc/fortran/resolve.c trunk/gcc/fortran/symbol.c trunk/gcc/fortran/trans-intrinsic.c trunk/gcc/testsuite/ChangeLog trunk/libgfortran/ChangeLog trunk/libgfortran/intrinsics/date_and_time.c -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=21565