summaryrefslogtreecommitdiff
path: root/libgomp
diff options
context:
space:
mode:
authorcesar <cesar@138bc75d-0d04-0410-961f-82ee72b054a4>2016-04-14 21:24:03 +0000
committercesar <cesar@138bc75d-0d04-0410-961f-82ee72b054a4>2016-04-14 21:24:03 +0000
commit11c5554cc61f2ce13d8f1f88008fcc07c4646845 (patch)
treeab4adc725d58c3e2adb242125c2ec626efbd140b /libgomp
parentda78d8e7ebaa2ad8c17d853910c9cce85a62824a (diff)
downloadgcc-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/ChangeLog5
-rw-r--r--libgomp/testsuite/libgomp.oacc-fortran/non-scalar-data.f908
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)