procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

libgomp: fix target-31.c testcase

Browse source 
* testsuite/libgomp.c/target-31.c: Fix testcase.

From-SVN: r233087
This commit is contained in:
Alexander Monakov 2016-02-02 21:18:43 +03:00 • committed by Alexander Monakov
parent e70b6ad754
commit 5854ee30ca
2 changed files with 16 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
libgomp/ChangeLog
View file

@ -1,3 +1,7 @@
2016-02-02 Alexander Monakov <amonakov@ispras.ru>
* testsuite/libgomp.c/target-31.c: Fix testcase.
2016-02-02 Alexander Monakov <amonakov@ispras.ru>
* testsuite/libgomp.c/examples-4/teams-3.c: Add missing reduction

13
libgomp/testsuite/libgomp.c/target-31.c
View file

@ -36,7 +36,18 @@ main ()
u3[i] = k + i;
#pragma omp parallel num_threads (1)
{
if (c != 3 || d != 4 || g[0] != 9 || g[1] != 10 || h[0] != 11 || h[1] != 12 || k != 14 || m[0] != 17 || m[1] != 18)
int v1, v2, v3;
#pragma omp atomic read
v1 = c;
#pragma omp atomic read
v2 = g[0];
#pragma omp atomic read
v3 = g[1];
if ((v1 < 3 || v1 > 6)
|| d != 4
|| (v2 < 9 || v2 > 15 || (v2 & 1) == 0)
|| (v3 < 10 || v3 > 19 || ((v3 - 10) % 3) != 0)
|| h[0] != 11 || h[1] != 12 || k != 14 || m[0] != 17 || m[1] != 18)
#pragma omp atomic write
err = 1;
b = omp_get_team_num ();