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] 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).