mirror of git://gcc.gnu.org/git/gcc.git
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:
parent
65bddf289e
commit
aadc043f3c
|
|
@ -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
|
||||
|
|
|
|||
|
|
@ -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)
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue