------- Comment #2 from longb at cray dot com 2007-09-08 01:03 ------- Subject: Re: GFORTRAN OPTIMIZATION ERROR ABOVE -O0 FOR MPICH2 TEST F90_RMA/BASEATTRWINF90.F90
kargl at gcc dot gnu dot org wrote: > ------- Comment #1 from kargl at gcc dot gnu dot org 2007-09-07 21:03 ------- > (In reply to comment #0) > > >>> ftn -o x -O2 bug2867.f90 >>> aprun -n 1 ./x >>> >> Got incorrect value for WIN_SIZE ( 140733193389056 , should be >> >> 1024 ) >> Got wrong value for WIN_DISP_UNIT ( 140733193388036 , should be >> > > What is ftn? On my system, when I build MPICH2 I get mpf90. > ftn is a script that allows the user to see a common interface for all the compilers we document. Which compiler is used is controlled by the module facility. Library sets are selected based on the compiler and OS combinations. The same command is used for both serial and parallel programs. Cheers, Bill > I added an else clause for printing the right values > > node10:kargl[227] ../mpich2/bin/mpif90 -o z -O2 long.f90 > node10:kargl[228] ./z > Got right value for WIN_DISP_UNIT ( 4 , should be 4 ) > node10:kargl[229] ../mpich2/bin/mpiexec -machinefile mf1 -n 1 ./z > Got right value for WIN_DISP_UNIT ( 4 , should be 4 ) > > node10:kargl[231] ../mpich2/bin/mpif90 --version > GNU Fortran (GCC) 4.2.1 20070523 (prerelease) > > > -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33339