https://gcc.gnu.org/bugzilla/show_bug.cgi?id=116254

--- Comment #5 from Paul Thomas <pault at gcc dot gnu.org> ---
Created attachment 58857
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=58857&action=edit
reduced testscase

On x86_64, the attached gives:

[pault@pc30 pr79685]$ ~/grun/bin/gfortran -O3 -m32
../pr102689/class_transformational_2.f90;./a.out
 shape (c) =            4           2           2
a%i =   1  1  1  1  2  2  2  2  1  1  1  1  2  2  2  2
a%j =  10 10 10 10 20 20 20 20 10 10 10 10 20 20 20 20

What do you obtain?

Paul

Reply via email to