non-scalar-data.f90: Don't pass parameter variables to subroutines.

libgomp/
	* testsuite/libgomp.oacc-fortran/non-scalar-data.f90: Don't
	pass parameter variables to subroutines.

From-SVN: r234992
This commit is contained in:
Cesar Philippidis 2016-04-14 14:24:03 -07:00 committed by Cesar Philippidis
parent 65bddf289e
commit aadc043f3c
2 changed files with 10 additions and 3 deletions

View File

@ -1,3 +1,8 @@
2016-04-14 Cesar Philippidis <cesar@codesourcery.com>
* testsuite/libgomp.oacc-fortran/non-scalar-data.f90: Don't
pass parameter variables to subroutines.
2016-04-14 Cesar Philippidis <cesar@codesourcery.com>
PR middle-end/70643

View File

@ -6,9 +6,11 @@
program main
implicit none
integer, parameter :: n = 100
integer :: array(n), i
integer,parameter :: size = 100
integer :: array(size), i, n
n = size
!$acc data copy(array)
call kernels(array, n)