------- Comment #2 from jvdelisle at gcc dot gnu dot org 2008-12-25 19:45 ------- g77 runtime accepts this and prints:
character(len=25) :: str str = '(1PD24.15E4)' write (*,'(1PD24.15E4)') 1.0d0 WRITE (*,str) 1.0d0 end $ g77 pr38439.f $ ./a.out 1.000000000000000E+00 1.000000000000000E+00 gfortran 4.4: $ gfc -std=legacy pr38439.f pr38439.f:3.72: write (*,'(1PD24.15E4)') 1.0d0 1 Warning: Period required in format specifier at (1) [je...@lenova pr38439]$ ./a.out 1.000000000000000D+0000 1.000000000000000D+0000 I think I will make the run-time consistent with the compile as far as error messages, giving a runtime warning if not -std-legacy. The 'D' exponent character is different from g77, but is standard conforming. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38439