re PR fortran/72744 (ICE in verify_ssa, at tree-ssa.c:1039)

	PR fortran/72744
	* gfortran.dg/gomp/pr72744.f90: New test.

From-SVN: r239619

gcc/testsuite/ChangeLog

 2016-08-19  Jakub Jelinek  <jakub@redhat.com>
 
+	PR fortran/72744
+	* gfortran.dg/gomp/pr72744.f90: New test.
+
 	PR fortran/69281
 	* gfortran.dg/gomp/pr69281.f90: New test.
 

gcc/testsuite/gfortran.dg/gomp/pr72744.f90

+! PR fortran/72744
+! { dg-do compile }
+! { dg-additional-options "-Ofast" }
+
+program pr72744
+  integer, parameter :: n = 20
+  integer :: i, z(n), h(n)
+  z = [(i, i=1,n)]
+  h = [(i, i=n,1,-1)]
+  call sub (n, h)
+  if ( any(h/=z) ) call abort
+end
+subroutine sub (n, x)
+  integer :: n, x(n)
+!$omp parallel
+  x(:) = x(n:1:-1)
+!$omp end parallel
+end