------- Comment #17 from dominiq at lps dot ens dot fr 2009-08-27 21:59 -------
Created an attachment (id=18439)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=18439&action=view)
reduced test without any subroutine
I have attached a reduced test without any subroutine. It requires the same
input as air.f90, but do not expect meaningful results. As such I get:
[ibook-dhum] lin/test% gfc -m64 -O2 -funsafe-math-optimizations air_db.f90
[ibook-dhum] lin/test% time a.out > /dev/null
4.306u 0.015s 0:04.32 99.7% 0+0k 0+1io 0pf+0w
If I comment line 94
WRITE (6,*) i , spx(i) , epx(i) , NPX(i)
I get
[ibook-dhum] lin/test% gfc -m64 -O2 -funsafe-math-optimizations air_db.f90
[ibook-dhum] lin/test% time a.out > /dev/null
6.464u 0.020s 0:06.49 99.8% 0+0k 0+2io 0pf+0w
Among the weirdness of this pr, if I comment also the line 502
WRITE (7,*) MXPx , MXPy
I get
[ibook-dhum] lin/test% gfc -m64 -O2 -funsafe-math-optimizations air_db.f90
[ibook-dhum] lin/test% time a.out > /dev/null
4.273u 0.014s 0:04.29 99.7% 0+0k 0+0io 0pf+0w
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40106
