https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95654
--- Comment #8 from Tom de Vries <vries at gcc dot gnu.org> --- Created attachment 49228 --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=49228&action=edit Dumps for failing test-case (no collapse case) (In reply to Tom de Vries from comment #7) > Minimal example after commit 91347c3bbf7 "Fortran: OpenMP - fix simd with > (last)private (PR97061)": > ... > ! { dg-do run } > > program main > implicit none > integer :: d1 > !$omp target map(from: d1) > > !$omp teams distribute parallel do simd default(none) lastprivate(d1) > > do d1 = 0, 31 > end do > !$omp end target > > if (d1 /= 32) stop 3 > end program > ... Corresponding dumps.