public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran
@ 2004-01-31 2:39 bdavis9659 at comcast dot net
2004-01-31 3:20 ` [Bug fortran/13940] " pinskia at gcc dot gnu dot org
` (10 more replies)
0 siblings, 11 replies; 12+ messages in thread
From: bdavis9659 at comcast dot net @ 2004-01-31 2:39 UTC (permalink / raw)
To: gcc-bugs
The subroutine listed below causes an ICE in gfortran. Compiles OK with
g77.
No declaration is made as to the "standard comforming" status of this code, only
that it is accepted by g77 ( and by SEL/GOULD FORT77)
$ cat dmubar.F
SUBROUTINE DMUBAR
INTEGER*4 DMUNDTAB(25)
DATA DMUNDTAB /X'40000000',X'20000000',X'10000000',
& X'08000000',X'04000000',X'02000000',X'01000000',
& X'00800000',X'00400000',X'00200000',X'00100000',
& X'00080000',X'00040000',X'00020000',X'00010000',
& X'00008000',X'00004000',X'00002000',X'00001000',
& X'00000800',X'00000400',X'00000200',X'00000100',
& X'00000080',X'00000040'/
II = DMUNDTAB(I)
RETURN
END
$ /usr/local/bin/gfortran -c dmubar.F
/tmp/ccmPnKj3.f:0: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
$ g77 -c dmubar.F
$ /usr/local/bin/gfortran --version
GNU Fortran 95 (GCC 3.5-tree-ssa 20040128 (merged 20040102))
--
Summary: [gfortran] F77 code accepted by g77 causes ICE in
gfortran
Product: gcc
Version: tree-ssa
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: bdavis9659 at comcast dot net
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] F77 code accepted by g77 causes ICE in gfortran
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
@ 2004-01-31 3:20 ` pinskia at gcc dot gnu dot org
2004-02-03 15:32 ` reichelt at gcc dot gnu dot org
` (9 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-01-31 3:20 UTC (permalink / raw)
To: gcc-bugs
--
What |Removed |Added
----------------------------------------------------------------------------
Keywords| |ice-on-valid-code
Target Milestone|--- |tree-ssa
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] F77 code accepted by g77 causes ICE in gfortran
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
2004-01-31 3:20 ` [Bug fortran/13940] " pinskia at gcc dot gnu dot org
@ 2004-02-03 15:32 ` reichelt at gcc dot gnu dot org
2004-04-05 0:06 ` [Bug fortran/13940] [gfortran] ICE with hex-values pinskia at gcc dot gnu dot org
` (8 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: reichelt at gcc dot gnu dot org @ 2004-02-03 15:32 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From reichelt at gcc dot gnu dot org 2004-02-03 15:32 -------
The hex-value extension of the data statement causes the crash.
Here's a shorter testcase:
===================================
SUBROUTINE FOO
INTEGER A(1)
DATA A /X'1'/
END
===================================
--
What |Removed |Added
----------------------------------------------------------------------------
CC| |reichelt at gcc dot gnu dot
| |org
Status|UNCONFIRMED |NEW
Ever Confirmed| |1
Last reconfirmed|0000-00-00 00:00:00 |2004-02-03 15:32:13
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] ICE with hex-values
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
2004-01-31 3:20 ` [Bug fortran/13940] " pinskia at gcc dot gnu dot org
2004-02-03 15:32 ` reichelt at gcc dot gnu dot org
@ 2004-04-05 0:06 ` pinskia at gcc dot gnu dot org
2004-04-30 13:42 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
` (7 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-04-05 0:06 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From pinskia at gcc dot gnu dot org 2004-04-05 00:06 -------
2915 if (gfc_find_symbol (name, NULL, 1, &sym))
2916 return MATCH_ERROR;
2917
2918 if (sym->attr.flavor != FL_PARAMETER)
sym is NULL at this point causing the seg fault.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] ICE with hex-values
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
` (2 preceding siblings ...)
2004-04-05 0:06 ` [Bug fortran/13940] [gfortran] ICE with hex-values pinskia at gcc dot gnu dot org
@ 2004-04-30 13:42 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
2004-04-30 14:02 ` pinskia at gcc dot gnu dot org
` (6 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: Tobias dot Schlueter at physik dot uni-muenchen dot de @ 2004-04-30 13:42 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From Tobias dot Schlueter at physik dot uni-muenchen dot de 2004-04-30 13:23 -------
(In reply to comment #2)
> 2915 if (gfc_find_symbol (name, NULL, 1, &sym))
> 2916 return MATCH_ERROR;
> 2917
> 2918 if (sym->attr.flavor != FL_PARAMETER)
>
> sym is NULL at this point causing the seg fault.
(this is from fortran/match.c)
I'm submitting a fix for the ICE. It remains the issue of supporting hexadecimal
constants in DATA statements. With this patch Volker's test gives:
In file pr13940.f90:3
DATA A /X'1'/
1
Error: Symbol 'x' must be a PARAMETER in DATA statement at (1)
--
What |Removed |Added
----------------------------------------------------------------------------
CC| |Tobias dot Schlueter at
| |physik dot uni-muenchen dot
| |de
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] ICE with hex-values
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
` (3 preceding siblings ...)
2004-04-30 13:42 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
@ 2004-04-30 14:02 ` pinskia at gcc dot gnu dot org
2004-04-30 18:58 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
` (5 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-04-30 14:02 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From pinskia at gcc dot gnu dot org 2004-04-30 13:40 -------
The patch here fixes the ICE but not rejects valid: <http://gcc.gnu.org/ml/fortran/2004-04/
msg00248.html>.
--
What |Removed |Added
----------------------------------------------------------------------------
Keywords| |patch
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] ICE with hex-values
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
` (4 preceding siblings ...)
2004-04-30 14:02 ` pinskia at gcc dot gnu dot org
@ 2004-04-30 18:58 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
2004-05-01 12:38 ` cvs-commit at gcc dot gnu dot org
` (4 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: Tobias dot Schlueter at physik dot uni-muenchen dot de @ 2004-04-30 18:58 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From Tobias dot Schlueter at physik dot uni-muenchen dot de 2004-04-30 18:17 -------
Patch which fixes reject-valid here:
http://gcc.gnu.org/ml/fortran/2004-04/msg00249.html
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] ICE with hex-values
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
` (5 preceding siblings ...)
2004-04-30 18:58 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
@ 2004-05-01 12:38 ` cvs-commit at gcc dot gnu dot org
2004-05-01 12:42 ` pinskia at gcc dot gnu dot org
` (3 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2004-05-01 12:38 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From cvs-commit at gcc dot gnu dot org 2004-05-01 12:38 -------
Subject: Bug 13940
CVSROOT: /cvs/gcc
Module name: gcc
Branch: tree-ssa-20020619-branch
Changes by: pbrook@gcc.gnu.org 2004-05-01 12:38:43
Modified files:
gcc/fortran : ChangeLog match.c
Log message:
PR fortran/13940
* match.c (match_data_constant): Handle case where
gfc_find_symbol sets sym to NULL
Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&only_with_tag=tree-ssa-20020619-branch&r1=1.1.2.147&r2=1.1.2.148
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/match.c.diff?cvsroot=gcc&only_with_tag=tree-ssa-20020619-branch&r1=1.1.2.8&r2=1.1.2.9
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] ICE with hex-values
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
` (6 preceding siblings ...)
2004-05-01 12:38 ` cvs-commit at gcc dot gnu dot org
@ 2004-05-01 12:42 ` pinskia at gcc dot gnu dot org
2004-05-01 12:48 ` cvs-commit at gcc dot gnu dot org
` (2 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-05-01 12:42 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From pinskia at gcc dot gnu dot org 2004-05-01 12:42 -------
Just a rejects-valid now.
--
What |Removed |Added
----------------------------------------------------------------------------
Keywords|ice-on-valid-code |rejects-valid
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] ICE with hex-values
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
` (7 preceding siblings ...)
2004-05-01 12:42 ` pinskia at gcc dot gnu dot org
@ 2004-05-01 12:48 ` cvs-commit at gcc dot gnu dot org
2004-05-01 13:06 ` pinskia at gcc dot gnu dot org
2004-05-16 20:33 ` cvs-commit at gcc dot gnu dot org
10 siblings, 0 replies; 12+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2004-05-01 12:48 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From cvs-commit at gcc dot gnu dot org 2004-05-01 12:48 -------
Subject: Bug 13940
CVSROOT: /cvs/gcc
Module name: gcc
Branch: tree-ssa-20020619-branch
Changes by: pbrook@gcc.gnu.org 2004-05-01 12:48:35
Modified files:
gcc/fortran : ChangeLog primary.c
Log message:
PR fortran/13940
* primary.c: Include system.h and flags.h, needed for pedantic.
(match_boz_constant): Allow "x" for hexadecimal constants, warn if
pedantic is set.
Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&only_with_tag=tree-ssa-20020619-branch&r1=1.1.2.148&r2=1.1.2.149
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/primary.c.diff?cvsroot=gcc&only_with_tag=tree-ssa-20020619-branch&r1=1.1.2.4&r2=1.1.2.5
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] ICE with hex-values
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
` (8 preceding siblings ...)
2004-05-01 12:48 ` cvs-commit at gcc dot gnu dot org
@ 2004-05-01 13:06 ` pinskia at gcc dot gnu dot org
2004-05-16 20:33 ` cvs-commit at gcc dot gnu dot org
10 siblings, 0 replies; 12+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-05-01 13:06 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From pinskia at gcc dot gnu dot org 2004-05-01 13:06 -------
Fixed.
--
What |Removed |Added
----------------------------------------------------------------------------
Status|NEW |RESOLVED
Resolution| |FIXED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/13940] [gfortran] ICE with hex-values
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
` (9 preceding siblings ...)
2004-05-01 13:06 ` pinskia at gcc dot gnu dot org
@ 2004-05-16 20:33 ` cvs-commit at gcc dot gnu dot org
10 siblings, 0 replies; 12+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2004-05-16 20:33 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From cvs-commit at gcc dot gnu dot org 2004-05-15 18:10 -------
Subject: Bug 13940
CVSROOT: /cvs/gcc
Module name: gcc
Changes by: tobi@gcc.gnu.org 2004-05-15 18:10:07
Modified files:
gcc/fortran : ChangeLog primary.c
gcc/testsuite : ChangeLog
gcc/testsuite/gfortran.fortran-torture/compile: data_1.f90
Log message:
testsuite:
PR fortran/13826
PR fortran/13940
* gfortran.fortran-torture/compile/data_1.f90: New test.
(add second test)
fortran:
* primary.c (match_boz_constant): Use gfc_notify_std() for
issuing a warning or an error.
Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&r1=1.18&r2=1.19
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/primary.c.diff?cvsroot=gcc&r1=1.3&r2=1.4
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.3752&r2=1.3753
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.fortran-torture/compile/data_1.f90.diff?cvsroot=gcc&r1=1.1&r2=1.2
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13940
^ permalink raw reply [flat|nested] 12+ messages in thread
end of thread, other threads:[~2004-05-15 18:10 UTC | newest]
Thread overview: 12+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-01-31 2:39 [Bug fortran/13940] New: [gfortran] F77 code accepted by g77 causes ICE in gfortran bdavis9659 at comcast dot net
2004-01-31 3:20 ` [Bug fortran/13940] " pinskia at gcc dot gnu dot org
2004-02-03 15:32 ` reichelt at gcc dot gnu dot org
2004-04-05 0:06 ` [Bug fortran/13940] [gfortran] ICE with hex-values pinskia at gcc dot gnu dot org
2004-04-30 13:42 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
2004-04-30 14:02 ` pinskia at gcc dot gnu dot org
2004-04-30 18:58 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
2004-05-01 12:38 ` cvs-commit at gcc dot gnu dot org
2004-05-01 12:42 ` pinskia at gcc dot gnu dot org
2004-05-01 12:48 ` cvs-commit at gcc dot gnu dot org
2004-05-01 13:06 ` pinskia at gcc dot gnu dot org
2004-05-16 20:33 ` cvs-commit 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).