Hi! This has been fixed already with r273096, but it is useful to have also a Fortran testcase. Committed to trunk as obvious.
2019-10-17 Jakub Jelinek <ja...@redhat.com> PR fortran/87752 * gfortran.dg/gomp/pr87752.f90: New test. --- gcc/testsuite/gfortran.dg/gomp/pr87752.f90.jj 2019-10-16 10:19:09.584439754 +0200 +++ gcc/testsuite/gfortran.dg/gomp/pr87752.f90 2019-10-16 10:19:02.343549209 +0200 @@ -0,0 +1,12 @@ +! PR fortran/87752 +! { dg-do compile } +! { dg-additional-options "-Ofast" } + +subroutine foo (n, u, v) + integer :: n + real, pointer :: u(:), v(:) + !$omp parallel do simd + do i = 1, n + u(:) = v(:) + end do +end Jakub