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