[Bug libfortran/18398] Formatted I/O problems

[bdavis at gcc dot gnu dot org]

------- Additional Comments From bdavis at gcc dot gnu dot org  2004-11-27 15:33 -------
here's a shorter test case:

      program  rinput
      implicit double precision(a-h,o-z)
      character *8 a,b
      open(unit=7)
      write(7,*)'aaaaaaa123.456'
      write(7,*)'bbbbbbb-123.456'
      write(7,*)
      rewind(7)
  610 format(a8,f10.5)
      read (7,610) a,cafin ,b,angmom
      print*, a,cafin ,b,angmom
      stop
      end


-- 


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