[Bug tree-optimization/52307] Segmentation fault in Lapack with -O3 -floop-flatten -floop-strip-mine

[dominiq at lps dot ens.fr]

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

--- Comment #6 from Dominique d'Humieres <dominiq at lps dot ens.fr> 2012-02-19 
14:19:23 UTC ---
Reduced code

integer :: I, J, NB = 3
real :: WORK(3,3) =1.0
real :: ZERO = 0.0
            DO 90 J = 1, NB
               DO 80 I = J + 1, NB
                  WORK( I, J ) = ZERO
   80          CONTINUE
   90       CONTINUE

print *, WORK
end