git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

re PR libgomp/88460 ([nvptx] FAIL: libgomp.c++/for-24.C (internal compiler error)) 

PR libgomp/88460
	* testsuite/libgomp.c++/for-24.C (results): Include it in
	omp declare target region.
	(main): Use map (always, tofrom: results) instead of
	map (tofrom: results).

From-SVN: r267093
This commit is contained in:
Jakub Jelinek 2018-12-13 13:53:19 +01:00 committed by Jakub Jelinek
parent b9cbcd3ef0
commit a51f8c92e2
2 changed files with 26 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
libgomp/ChangeLog
View File

@ -1,3 +1,11 @@
2018-12-13 Jakub Jelinek <jakub@redhat.com>
PR libgomp/88460
* testsuite/libgomp.c++/for-24.C (results): Include it in
omp declare target region.
(main): Use map (always, tofrom: results) instead of
map (tofrom: results).
2018-12-12 Jakub Jelinek <jakub@redhat.com> 2018-12-12 Jakub Jelinek <jakub@redhat.com>
PR fortran/88463 PR fortran/88463

38
libgomp/testsuite/libgomp.c++/for-24.C
View File

@ -113,11 +113,9 @@ short c[50];
int d[1024]; int d[1024];
K e[1089]; K e[1089];
L f[1093]; L f[1093];
#pragma omp end declare target
int results[2000]; int results[2000];
#pragma omp declare target
template <typename T> template <typename T>
void void
baz (I<T> &i) baz (I<T> &i)
@ -370,58 +368,58 @@ main ()
f[i].c = 5 * i; f[i].c = 5 * i;
} }
#pragma omp target update to (a, b, c, d, e, f) #pragma omp target update to (a, b, c, d, e, f)
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f1 (); f1 ();
check (1); check (1);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f2 (); f2 ();
check (1); check (1);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f3 (); f3 ();
check (1); check (1);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f4 (J<int> (&a[14], &a[1803])); f4 (J<int> (&a[14], &a[1803]));
check (i >= 14 && i < 1803); check (i >= 14 && i < 1803);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f5 (); f5 ();
check (i >= 0 && i < 1024); check (i >= 0 && i < 1024);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f6 (J<K> (&e[19], &e[1029])); f6 (J<K> (&e[19], &e[1029]));
check (i >= 19 && i < 1029); check (i >= 19 && i < 1029);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f7 (J<L> (&f[15], &f[1091])); f7 (J<L> (&f[15], &f[1091]));
check (i >= 15 && i < 1091); check (i >= 15 && i < 1091);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f8 (J<K> (&e[27], &e[1037])); f8 (J<K> (&e[27], &e[1037]));
check (i >= 27 && i < 1037); check (i >= 27 && i < 1037);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f9 (J<L> (&f[1], &f[1012])); f9 (J<L> (&f[1], &f[1012]));
check (i >= 1 && i < 1012); check (i >= 1 && i < 1012);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f10 <0> (); f10 <0> ();
check (1); check (1);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f11 <1> (); f11 <1> ();
check (1); check (1);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f12 <2> (); f12 <2> ();
check (1); check (1);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f13 (J<int> (&a[24], &a[1703])); f13 (J<int> (&a[24], &a[1703]));
check (i >= 24 && i < 1703); check (i >= 24 && i < 1703);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f14 <1024> (); f14 <1024> ();
check (i >= 0 && i < 1024); check (i >= 0 && i < 1024);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f15 (J<K> (&e[39], &e[929])); f15 (J<K> (&e[39], &e[929]));
check (i >= 39 && i < 929); check (i >= 39 && i < 929);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f16 (J<L> (&f[17], &f[1071])); f16 (J<L> (&f[17], &f[1071]));
check (i >= 17 && i < 1071); check (i >= 17 && i < 1071);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f17 <3> (J<K> (&e[7], &e[1017])); f17 <3> (J<K> (&e[7], &e[1017]));
check (i >= 7 && i < 1017); check (i >= 7 && i < 1017);
#pragma omp target teams map (tofrom: results) #pragma omp target teams map (always, tofrom: results)
f18 <5> (J<L> (&f[121], &f[1010])); f18 <5> (J<L> (&f[121], &f[1010]));
check (i >= 121 && i < 1010); check (i >= 121 && i < 1010);
} }