$ cat tab.f
program main
write (*,'(t1000000,a,t1,a)') 'b', 'a'
end
$ gfortran tab.f
$ ./a.out > foo.dat
$ od -a -N32 foo.dat
0000000 a nul nul nul nul nul nul nul nul nul nul nul nul nul nul nul
0000020 nul nul nul nul nul nul nul nul nul nul nul nul nul nul nul nul
0000040
--
Summary: zero bytes when reverse-tabbing long records (regression
vs. g77)
Product: gcc
Version: unknown
Status: UNCONFIRMED
Keywords: wrong-code
Severity: normal
Priority: P3
Component: libfortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: tkoenig at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34974
