This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libfortran/14334] New: [libgfortran] L edit descriptor does not work.
- From: "bdavis9659 at comcast dot net" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 28 Feb 2004 16:32:29 -0000
- Subject: [Bug libfortran/14334] New: [libgfortran] L edit descriptor does not work.
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
The 'L' edit descriptor prints either T or F, depending on the field width, but
the value printed has no relationship to the value of the data item.
logical true,false
true = .TRUE.
false = .FALSE.
print*,'true = ',true
write(6,'(L1)')true
write(6,'(L4)')true
print*,'false = ',false
write(6,'(L1)')false
write(6,'(L4)')false
end
$ /usr/local/bin/gfortran -static -g lprint.f90
$ ./a.out
true = T
F
T
false = F
F
T
$/usr/local/bin/gfortran --version
GNU Fortran 95 (GCC 3.5-tree-ssa 20040228 (merged 20040211))
Using the "gold standard" , g77, here is what the output should be:
$ g77 -static -g lprint.f
$ ./a.out
true = T
T
T
false = F
F
F
--
Summary: [libgfortran] L edit descriptor does not work.
Product: gcc
Version: tree-ssa
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: libfortran
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=14334