------- Comment #5 from dominiq at lps dot ens dot fr  2009-09-17 20:54 -------
At revision 151771 the test in the test suite still fails at -m64, but passes
with the addition of the print:

--- where_2.f90 2005-07-04 08:24:26.000000000 +0200
+++
/opt/gcc/_gcc_clean/gcc/testsuite/gfortran.fortran-torture/execute/where_2.f90 
    2007-11-21 20:23:35.000000000 +0100
@@ -17,7 +17,6 @@
       temp = 300 + temp
    END WHERE

-   print *, temp
    if (any (temp .ne. (/100, 100, 100, 210, 210, 210, 310, 310, 337, 337/))) &
       call abort
 end program


-- 


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

Reply via email to