REAL :: x
CHARACTER(80) :: str
x = 0.0
write (str,'(f0.3)') x
print *, str
END
gives
**
Other reals ok.
Downloaded 32-bit gfortran from Equation.com today: 4.4-20090306. Running on
Win64.
--
Summary: gfortran 20090306: internal write of 0.0 with F0.3
gives **
Product: gcc
Version: 4.4.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: libfortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: davidgkinniburgh at yahoo dot co dot uk
GCC host triplet: x86_64-pc-mingw32
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=39402