[Bug libfortran/19363] New: List directed write of Infinity and NaN has regressed

[paulthomas2 at wanadoo dot fr]

program test_list
  real x , y
  x = 0.0
  y = 0.0
  write(*,*,iostat=ier) x /y
  x = 1.0
  write(*,*,iostat=ier) x /y
end program test_list

correctly gave with gfortran 20041010

$ ./a
            NaN
      +Infinity

but now gives, for either NaN or Infinity, with gfortran 20050108

$ ./a
At line 5 of file /cygdrive/d/gfortran/test_list.f90
Internal Error: printf is broken

-- 
           Summary: List directed write of Infinity and NaN has regressed
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: paulthomas2 at wanadoo dot fr
                CC: gcc-bugs at gcc dot gnu dot org,paul dot richard dot
                    thomas at cea dot fr


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19363