Commit 98d03683 by Rainer Orth Committed by Rainer Orth

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
parent 96c891b3
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>
* config/linux/proc.h: New.
......
......@@ -3,42 +3,42 @@
#include <omp.h>
#include <cstdlib>
int err;
int errval;
int
main ()
{
int e;
#pragma omp parallel shared(err)
#pragma omp parallel shared(errval)
{
if (omp_in_final ())
#pragma omp atomic write
err = 1;
#pragma omp task if (0) shared(err)
errval = 1;
#pragma omp task if (0) shared(errval)
{
if (omp_in_final ())
#pragma omp atomic write
err = 1;
#pragma omp task if (0) shared(err)
errval = 1;
#pragma omp task if (0) shared(errval)
if (omp_in_final ())
#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 ())
#pragma omp atomic write
err = 1;
errval = 1;
#pragma omp taskyield
#pragma omp taskwait
#pragma omp task shared(err)
#pragma omp task shared(errval)
if (!omp_in_final ())
#pragma omp atomic write
err = 1;
errval = 1;
}
}
#pragma omp atomic read
e = err;
e = errval;
if (e)
abort ();
}
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment