public inbox for gcc-bugs@sourceware.org help / color / mirror / Atom feed
* [Bug fortran/44350] accepts illegal fortran in BLOCK DATA [not found] <bug-44350-4@http.gcc.gnu.org/bugzilla/> @ 2013-04-16 8:50 ` zeccav at gmail dot com 2013-10-19 17:39 ` dominiq at lps dot ens.fr ` (4 subsequent siblings) 5 siblings, 0 replies; 7+ messages in thread From: zeccav at gmail dot com @ 2013-04-16 8:50 UTC (permalink / raw) To: gcc-bugs http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44350 Vittorio Zecca <zeccav at gmail dot com> changed: What |Removed |Added ---------------------------------------------------------------------------- Version|4.5.0 |4.8.0 --- Comment #2 from Vittorio Zecca <zeccav at gmail dot com> 2013-04-16 08:50:22 UTC --- I still have the same bug on gfortran 4.8.0. This is same as 50516. ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug fortran/44350] accepts illegal fortran in BLOCK DATA [not found] <bug-44350-4@http.gcc.gnu.org/bugzilla/> 2013-04-16 8:50 ` [Bug fortran/44350] accepts illegal fortran in BLOCK DATA zeccav at gmail dot com @ 2013-10-19 17:39 ` dominiq at lps dot ens.fr 2013-10-19 17:41 ` dominiq at lps dot ens.fr ` (3 subsequent siblings) 5 siblings, 0 replies; 7+ messages in thread From: dominiq at lps dot ens.fr @ 2013-10-19 17:39 UTC (permalink / raw) To: gcc-bugs http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44350 --- Comment #4 from Dominique d'Humieres <dominiq at lps dot ens.fr> --- *** Bug 50516 has been marked as a duplicate of this bug. *** ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug fortran/44350] accepts illegal fortran in BLOCK DATA [not found] <bug-44350-4@http.gcc.gnu.org/bugzilla/> 2013-04-16 8:50 ` [Bug fortran/44350] accepts illegal fortran in BLOCK DATA zeccav at gmail dot com 2013-10-19 17:39 ` dominiq at lps dot ens.fr @ 2013-10-19 17:41 ` dominiq at lps dot ens.fr 2013-10-22 5:56 ` burnus at gcc dot gnu.org ` (2 subsequent siblings) 5 siblings, 0 replies; 7+ messages in thread From: dominiq at lps dot ens.fr @ 2013-10-19 17:41 UTC (permalink / raw) To: gcc-bugs http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44350 --- Comment #5 from Dominique d'Humieres <dominiq at lps dot ens.fr> --- Also present on trunk (4.9) at revision 203859. ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug fortran/44350] accepts illegal fortran in BLOCK DATA [not found] <bug-44350-4@http.gcc.gnu.org/bugzilla/> ` (2 preceding siblings ...) 2013-10-19 17:41 ` dominiq at lps dot ens.fr @ 2013-10-22 5:56 ` burnus at gcc dot gnu.org 2013-10-29 21:48 ` burnus at gcc dot gnu.org 2013-10-29 23:00 ` burnus at gcc dot gnu.org 5 siblings, 0 replies; 7+ messages in thread From: burnus at gcc dot gnu.org @ 2013-10-22 5:56 UTC (permalink / raw) To: gcc-bugs http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44350 Tobias Burnus <burnus at gcc dot gnu.org> changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |burnus at gcc dot gnu.org --- Comment #6 from Tobias Burnus <burnus at gcc dot gnu.org> --- Incomplete draft patch. It probably rejects too much and doesn't permit all which is listed in comment 1. --- a/gcc/fortran/parse.c +++ b/gcc/fortran/parse.c @@ -2629,4 +2629,19 @@ loop: break; } + else if (gfc_current_state () == COMP_BLOCK_DATA) + switch (st) + { + case ST_ATTR_DECL: + case ST_COMMON: + case ST_TYPE: + case ST_END_BLOCK_DATA: + break; + + default: + gfc_error ("%s statement is not allowed inside of BLOCK DATA at %C", + gfc_ascii_statement (st)); + reject_statement (); + break; + } /* If we find a statement that can not be followed by an IMPLICIT statement ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug fortran/44350] accepts illegal fortran in BLOCK DATA [not found] <bug-44350-4@http.gcc.gnu.org/bugzilla/> ` (3 preceding siblings ...) 2013-10-22 5:56 ` burnus at gcc dot gnu.org @ 2013-10-29 21:48 ` burnus at gcc dot gnu.org 2013-10-29 23:00 ` burnus at gcc dot gnu.org 5 siblings, 0 replies; 7+ messages in thread From: burnus at gcc dot gnu.org @ 2013-10-29 21:48 UTC (permalink / raw) To: gcc-bugs http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44350 --- Comment #7 from Tobias Burnus <burnus at gcc dot gnu.org> --- Author: burnus Date: Tue Oct 29 21:48:02 2013 New Revision: 204185 URL: http://gcc.gnu.org/viewcvs?rev=204185&root=gcc&view=rev Log: 2013-10-29 Tobias Burnus <burnus@net-b.de> PR fortran/44350 * parse.c (parse_spec): Add C1116 constraint check for BLOCK DATA. 2013-10-29 Tobias Burnus <burnus@net-b.de> PR fortran/44350 * gfortran.dg/blockdata_8.f90: New. Added: trunk/gcc/testsuite/gfortran.dg/blockdata_8.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/parse.c trunk/gcc/testsuite/ChangeLog ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug fortran/44350] accepts illegal fortran in BLOCK DATA [not found] <bug-44350-4@http.gcc.gnu.org/bugzilla/> ` (4 preceding siblings ...) 2013-10-29 21:48 ` burnus at gcc dot gnu.org @ 2013-10-29 23:00 ` burnus at gcc dot gnu.org 5 siblings, 0 replies; 7+ messages in thread From: burnus at gcc dot gnu.org @ 2013-10-29 23:00 UTC (permalink / raw) To: gcc-bugs http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44350 Tobias Burnus <burnus at gcc dot gnu.org> changed: What |Removed |Added ---------------------------------------------------------------------------- Status|NEW |RESOLVED Resolution|--- |FIXED --- Comment #8 from Tobias Burnus <burnus at gcc dot gnu.org> --- FIXED on the trunk (4.9). Thanks for the report! ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug fortran/44350] New: accepts illegal fortran in BLOCK DATA @ 2010-05-31 16:25 zeccav at gmail dot com 2010-06-01 7:39 ` [Bug fortran/44350] " burnus at gcc dot gnu dot org 0 siblings, 1 reply; 7+ messages in thread From: zeccav at gmail dot com @ 2010-05-31 16:25 UTC (permalink / raw) To: gcc-bugs The following provokes the summary: block data common x c illegal f(x)=x c illegal interface end interface c illegal 1 format() end Best regards Vittorio Zecca -- Summary: accepts illegal fortran in BLOCK DATA Product: gcc Version: 4.5.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: zeccav at gmail dot com GCC host triplet: x86_64-unknown-linux-gnu http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44350 ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug fortran/44350] accepts illegal fortran in BLOCK DATA 2010-05-31 16:25 [Bug fortran/44350] New: " zeccav at gmail dot com @ 2010-06-01 7:39 ` burnus at gcc dot gnu dot org 0 siblings, 0 replies; 7+ messages in thread From: burnus at gcc dot gnu dot org @ 2010-06-01 7:39 UTC (permalink / raw) To: gcc-bugs ------- Comment #1 from burnus at gcc dot gnu dot org 2010-06-01 07:39 ------- CONFIRM and no regression. Thanks for the report. For the block data construct (F2008, 11.3) the compiler shall diagnose the following constraints: C1116 (R1120) A block-data specification-part shall contain only definitions of derived-type definitions and ASYNCHRONOUS, BIND, COMMON, DATA, DIMENSION, EQUIVALENCE, IMPLICIT, INTRINSIC, PARAMETER, POINTER, SAVE, TARGET, USE, VOLATILE, and type declaration statements. C1117 (R1120) A type declaration statement in a block-data specification-part shall not contain ALLOCATABLE, EXTERNAL, or BIND attribute specifiers. -- burnus at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Ever Confirmed|0 |1 Keywords| |accepts-invalid Last reconfirmed|0000-00-00 00:00:00 |2010-06-01 07:39:16 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44350 ^ permalink raw reply [flat|nested] 7+ messages in thread
end of thread, other threads:[~2013-10-29 23:00 UTC | newest] Thread overview: 7+ messages (download: mbox.gz / follow: Atom feed) -- links below jump to the message on this page -- [not found] <bug-44350-4@http.gcc.gnu.org/bugzilla/> 2013-04-16 8:50 ` [Bug fortran/44350] accepts illegal fortran in BLOCK DATA zeccav at gmail dot com 2013-10-19 17:39 ` dominiq at lps dot ens.fr 2013-10-19 17:41 ` dominiq at lps dot ens.fr 2013-10-22 5:56 ` burnus at gcc dot gnu.org 2013-10-29 21:48 ` burnus at gcc dot gnu.org 2013-10-29 23:00 ` burnus at gcc dot gnu.org 2010-05-31 16:25 [Bug fortran/44350] New: " zeccav at gmail dot com 2010-06-01 7:39 ` [Bug fortran/44350] " burnus at gcc dot gnu dot org
This is a public inbox, see mirroring instructions for how to clone and mirror all data and code used for this inbox; as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).