diff mbox series

[committed] Add testcase for already fixed omp simd ICE (PR fortran/87752)

Message ID 20191017065121.GT2116@tucnak
State New
Headers show
Series [committed] Add testcase for already fixed omp simd ICE (PR fortran/87752) | expand

Commit Message

Jakub Jelinek Oct. 17, 2019, 6:51 a.m. UTC 
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  <jakub@redhat.com>

	PR fortran/87752
	* gfortran.dg/gomp/pr87752.f90: New test.


	Jakub
diff mbox series

Patch

--- 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