https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95654
--- Comment #6 from Tom de Vries <vries at gcc dot gnu.org> --- Created attachment 49227 --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=49227&action=edit Dumps for failing test-case (In reply to Tom de Vries from comment #5) > Minimal example: > ... > ! { dg-do run } > > program main > implicit none > integer :: d1, d2 > !$omp target map(from: d1) > > !$omp teams distribute parallel do simd default(none) lastprivate(d1) & > > !$omp& collapse(2) > > do d1 = 0, 31 > do d2 = 0, 31 > end do > end do > !$omp end target > > if (d1 /= 32) stop 3 > end program > ... Corresponding dumps.