https://gcc.gnu.org/bugzilla/show_bug.cgi?id=71404
H.J. Lu <hjl.tools at gmail dot com> changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|WAITING |NEW
Target Milestone|--- |7.0
--- Comment #3 from H.J. Lu <hjl.tools at gmail dot com> ---
[hjl@gnu-ivb-1 build_base_lnx32e-gcc.0000]$ cat foo.f
SUBROUTINE SQRINT (LFILE,IREGION,LENGTH)
IMPLICIT DOUBLE PRECISION(A-H,O-Z)
DIMENSION IREGION(LENGTH)
LOGICAL GOPARR,DSKWRK,MASWRK
COMMON /IOFILE/ IR,IW,IP,IIS,IPK,IIDAF,NAV,IIODA(400)
COMMON /PAR / ME,MASTER,NPROC,IBTYP,IPTIM,GOPARR,DSKWRK,MASWRK
IF (DSKWRK.OR.MASWRK) READ(LFILE, END=200, ERR=300) IREGION
200 CONTINUE
300 CONTINUE
END
[hjl@gnu-ivb-1 build_base_lnx32e-gcc.0000]$
/export/gnu/import/git/gcc-regression/master/237006/bld/gcc/xgcc
-B//export/gnu/import/git/gcc-regression/master/237006/bld/gcc/ -O2 -ffast-math
-ffixed-form -S foo.f
foo.f:7:0:
IF (DSKWRK.OR.MASWRK) READ(LFILE, END=200, ERR=300) IREGION
internal compiler error: in gfc_get_symbol_decl, at fortran/trans-decl.c:1370
0x8993c5 gfc_get_symbol_decl(gfc_symbol*)
../../../../gcc/gcc/fortran/trans-decl.c:1364
0x8b57ec gfc_conv_variable
../../../../gcc/gcc/fortran/trans-expr.c:2456
0x8c6167 gfc_conv_expr(gfc_se*, gfc_expr*)
../../../../gcc/gcc/fortran/trans-expr.c:7591
0x8b7a71 gfc_conv_expr_op
../../../../gcc/gcc/fortran/trans-expr.c:3321
0x8c6122 gfc_conv_expr(gfc_se*, gfc_expr*)
../../../../gcc/gcc/fortran/trans-expr.c:7579
0x8c626a gfc_conv_expr_val(gfc_se*, gfc_expr*)
../../../../gcc/gcc/fortran/trans-expr.c:7636
0x908cfc gfc_trans_if_1
../../../../gcc/gcc/fortran/trans-stmt.c:1293
0x908e2f gfc_trans_if(gfc_code*)
../../../../gcc/gcc/fortran/trans-stmt.c:1330
0x87252b trans_code
../../../../gcc/gcc/fortran/trans.c:1777
0x8728e1 gfc_trans_code(gfc_code*)
../../../../gcc/gcc/fortran/trans.c:1991
0x8aa34d gfc_generate_function_code(gfc_namespace*)
../../../../gcc/gcc/fortran/trans-decl.c:6171
0x872925 gfc_generate_code(gfc_namespace*)
../../../../gcc/gcc/fortran/trans.c:2008
0x8083c7 translate_all_program_units
../../../../gcc/gcc/fortran/parse.c:5843
0x8089d7 gfc_parse_file()
../../../../gcc/gcc/fortran/parse.c:6049
0x85bc8e gfc_be_parse_file
../../../../gcc/gcc/fortran/f95-lang.c:201
Please submit a full bug report,
with preprocessed source if appropriate.
Please include the complete backtrace with any bug report.
See <http://gcc.gnu.org/bugs.html> for instructions.
[hjl@gnu-ivb-1 build_base_lnx32e-gcc.0000]$
