This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/29870] New: Arithmetic IF, existing label and "label not defined"
- From: "burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 16 Nov 2006 19:38:21 -0000
- Subject: [Bug fortran/29870] New: Arithmetic IF, existing label and "label not defined"
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
SUBROUTINE ACFI(X,ARG,VAL,Y,NDIM,EPS,IER) ACFI 730
IF(Q3)11,12,11
ACFI1320
11 Y=P3/Q3
ACFI1330
12 Y=1.E75
ACFI1350
END
ACFI1580
This is part of http://www.ecalculations.com/SSP.EXE (this is a ZIP file).
Error message of gfortran ACFI.FOR:
ACFI.FOR:2.72:
IF(Q3)11,12,11
1
Warning: Obsolete: arithmetic IF statement at (1)
ACFI.FOR:4.13:
12 Y=1.E75
1
Error: Real constant overflows its kind at (1)
ACFI.FOR:2.72:
IF(Q3)11,12,11
1
Error: Label 12 referenced at (1) is never defined
--
Summary: Arithmetic IF, existing label and "label not defined"
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Keywords: rejects-valid
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: burnus at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29870