------- Comment #5 from tkoenig at gcc dot gnu dot org 2008-12-29 12:24 -------
Some simple test cases:
$ cat write-dollar.f
program main
do i=1,10**6
write (10,fmt='(A$)') 'a'
end do
end
$ g77-3.4 -O write-dollar.f && time ./a.out
real 0m3.356s
user 0m1.068s
sys 0m2.280s
$ gfortran -O write-dollar.f && time ./a.out
real 0m12.198s
user 0m2.172s
sys 0m10.009s
$ gfortran -O write-advance.f && time ./a.out
real 0m10.737s
user 0m2.828s
sys 0m7.292s
$ ifort write-advance.f && time ./a.out
real 0m0.488s
user 0m0.480s
sys 0m0.008s
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2008-12-29 12:24:52
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38654
