------- Comment #1 from tkoenig at gcc dot gnu dot org  2008-01-20 20:18 -------
Reduced test case:

$ cat bug-4.f
      program main
      write (*,'(3X A, T1, A,/)') 'aa', 'bb'
      end
$ gfortran bug-4.f && ./a.out
bb

$ g77 bug-4.f && ./a.out
bb aa


-- 

tkoenig at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
           Keywords|                            |wrong-code
   Last reconfirmed|0000-00-00 00:00:00         |2008-01-20 20:18:11
               date|                            |
            Summary|NIST FM903.f anomaly        |reverse tabbing before slash
                   |                            |descriptor (regression vs.
                   |                            |g77)


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

Reply via email to