https://gcc.gnu.org/bugzilla/show_bug.cgi?id=90374

--- Comment #20 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
While working on this I found another issue:

program test
  implicit none
  real(8) :: rn
  character(32) :: afmt, aresult
  rn = 0.000000000000000314e8_8
  write (*,fmt="(E0.8e0, a3)") rn, "<<<"
end

$ gfc c10.f90 
$ ./a.out 
At line 6 of file c10.f90 (unit = 6, file = 'stdout')
Fortran runtime error: Expected REAL for item 2 in formatted transfer, got
CHARACTER
(E0.8e0, a3)

This is a more serious error since I am parsing wrong here.
     ^

Reply via email to