diff options
author | cesar <cesar@138bc75d-0d04-0410-961f-82ee72b054a4> | 2016-04-14 21:24:03 +0000 |
---|---|---|
committer | cesar <cesar@138bc75d-0d04-0410-961f-82ee72b054a4> | 2016-04-14 21:24:03 +0000 |
commit | 11c5554cc61f2ce13d8f1f88008fcc07c4646845 (patch) | |
tree | ab4adc725d58c3e2adb242125c2ec626efbd140b /libgomp | |
parent | da78d8e7ebaa2ad8c17d853910c9cce85a62824a (diff) | |
download | gcc-11c5554cc61f2ce13d8f1f88008fcc07c4646845.tar.gz |
libgomp/
* testsuite/libgomp.oacc-fortran/non-scalar-data.f90: Don't
pass parameter variables to subroutines.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@234992 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgomp')
-rw-r--r-- | libgomp/ChangeLog | 5 | ||||
-rw-r--r-- | libgomp/testsuite/libgomp.oacc-fortran/non-scalar-data.f90 | 8 |
2 files changed, 10 insertions, 3 deletions
diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog index 89ee866ac4c..1c82e5de1ef 100644 --- a/libgomp/ChangeLog +++ b/libgomp/ChangeLog @@ -1,5 +1,10 @@ 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 * testsuite/libgomp.oacc-fortran/pr70643.f90: New test. diff --git a/libgomp/testsuite/libgomp.oacc-fortran/non-scalar-data.f90 b/libgomp/testsuite/libgomp.oacc-fortran/non-scalar-data.f90 index 4afb562e00c..94e4228e7a9 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/non-scalar-data.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/non-scalar-data.f90 @@ -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) |