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

re PR target/49965 (libgomp.c++/reduction-4.C and libgomp.c++/task-8.C FAIL on Solaris 11/SPARC) 

PR libgomp/49965
	* testsuite/libgomp.c++/task-8.C: Replaced err by errval.

From-SVN: r177428
This commit is contained in:
Rainer Orth 2011-08-05 12:22:10 +00:00 committed by Rainer Orth
parent 96c891b30a
commit 98d0368392
2 changed files with 17 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
libgomp/ChangeLog
View File

@ -1,3 +1,8 @@
2011-08-05 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
PR libgomp/49965
* testsuite/libgomp.c++/task-8.C: Replaced err by errval.
2011-08-03 Uros Bizjak <ubizjak@gmail.com> 2011-08-03 Uros Bizjak <ubizjak@gmail.com>
* config/linux/proc.h: New. * config/linux/proc.h: New.

24
libgomp/testsuite/libgomp.c++/task-8.C
View File

@ -3,42 +3,42 @@
#include <omp.h> #include <omp.h>
#include <cstdlib> #include <cstdlib>
int err; int errval;
int int
main () main ()
{ {
int e; int e;
#pragma omp parallel shared(err) #pragma omp parallel shared(errval)
{ {
if (omp_in_final ()) if (omp_in_final ())
#pragma omp atomic write #pragma omp atomic write
err = 1; errval = 1;
#pragma omp task if (0) shared(err) #pragma omp task if (0) shared(errval)
{ {
if (omp_in_final ()) if (omp_in_final ())
#pragma omp atomic write #pragma omp atomic write
err = 1; errval = 1;
#pragma omp task if (0) shared(err) #pragma omp task if (0) shared(errval)
if (omp_in_final ()) if (omp_in_final ())
#pragma omp atomic write #pragma omp atomic write
err = 1; errval = 1;
} }
#pragma omp task final (1) shared(err) #pragma omp task final (1) shared(errval)
{ {
if (!omp_in_final ()) if (!omp_in_final ())
#pragma omp atomic write #pragma omp atomic write
err = 1; errval = 1;
#pragma omp taskyield #pragma omp taskyield
#pragma omp taskwait #pragma omp taskwait
#pragma omp task shared(err) #pragma omp task shared(errval)
if (!omp_in_final ()) if (!omp_in_final ())
#pragma omp atomic write #pragma omp atomic write
err = 1; errval = 1;
} }
} }
#pragma omp atomic read #pragma omp atomic read
e = err; e = errval;
if (e) if (e)
abort (); abort ();
} }