This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libfortran/21647] New: INQUIRE errors when using -fdefault-integer-8
- From: "dir at lanl dot gov" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 18 May 2005 15:58:19 -0000
- Subject: [Bug libfortran/21647] New: INQUIRE errors when using -fdefault-integer-8
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
When compilied with "-fdefault-integer-8", inquire incorrectly says that a file
exits. It works correctly without the "-fdefault-integer-8"
[dranta:~/tests/gfortran] dir% gfortran -fdefault-integer-8 -o d8test4 d8test4.f
[dranta:~/tests/gfortran] dir% d8test4
output exists
STOP 0
[dranta:~/tests/gfortran] dir% gfortran -o d8test4 d8test4.f
[dranta:~/tests/gfortran] dir% d8test4
output Does not exist
STOP 0
[dranta:~/tests/gfortran] dir% cat d8test4.f
program test2
character*8 nfn
LOGICAL EX
nfn='output'
INQUIRE (FILE=nfn,EXIST=EX)
IF (EX) THEN
WRITE(*,*)nfn, ' exists'
ELSE
WRITE(*,*)nfn,' Does not exist'
END IF
stop
end
[dranta:~/tests/gfortran] dir% ls o*
tcsh: ls: No match.
--
Summary: INQUIRE errors when using -fdefault-integer-8
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: libfortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: dir at lanl dot gov
CC: gcc-bugs at gcc dot gnu dot org
GCC build triplet: powerpc-apple-darwin7.9.0
GCC host triplet: powerpc-apple-darwin7.9.0
GCC target triplet: powerpc-apple-darwin7.9.0
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=21647