summaryrefslogtreecommitdiffstats
path: root/openmp/testsuite/c/omp_parallel_sections_lastprivate.c
diff options
context:
space:
mode:
Diffstat (limited to 'openmp/testsuite/c/omp_parallel_sections_lastprivate.c')
-rw-r--r--openmp/testsuite/c/omp_parallel_sections_lastprivate.c70
1 files changed, 0 insertions, 70 deletions
diff --git a/openmp/testsuite/c/omp_parallel_sections_lastprivate.c b/openmp/testsuite/c/omp_parallel_sections_lastprivate.c
deleted file mode 100644
index 55ae5f0cb26..00000000000
--- a/openmp/testsuite/c/omp_parallel_sections_lastprivate.c
+++ /dev/null
@@ -1,70 +0,0 @@
-<ompts:test>
-<ompts:testdescription>Test which checks the omp parallel sections lastprivate directive.</ompts:testdescription>
-<ompts:ompversion>2.0</ompts:ompversion>
-<ompts:directive>omp parallel sections lastprivate</ompts:directive>
-<ompts:dependences>omp critical,omp parallel sections private</ompts:dependences>
-<ompts:testcode>
-#include <stdio.h>
-#include "omp_testsuite.h"
-
-int <ompts:testcode:functionname>omp_parallel_sections_lastprivate</ompts:testcode:functionname>(FILE * logFile){
- <ompts:orphan:vars>
- int sum;
- int sum0;
- int i;
- int i0;
- </ompts:orphan:vars>
- int known_sum;
- sum =0;
- sum0 = 0;
- i0 = -1;
-
- <ompts:orphan>
-#pragma omp parallel sections private(i,sum0) <ompts:check>lastprivate(i0)</ompts:check><ompts:crosscheck>private(i0)</ompts:crosscheck>
- {
-#pragma omp section
- {
- sum0=0;
- for (i=1;i<400;i++)
- {
- sum0=sum0+i;
- i0=i;
- }
-#pragma omp critical
- {
- sum= sum+sum0;
- } /*end of critical*/
- }/* end of section */
-#pragma omp section
- {
- sum0=0;
- for(i=400;i<700;i++)
- {
- sum0=sum0+i; /*end of for*/
- i0=i;
- }
-#pragma omp critical
- {
- sum= sum+sum0;
- } /*end of critical*/
- }
-#pragma omp section
- {
- sum0=0;
- for(i=700;i<1000;i++)
- {
- sum0=sum0+i;
- i0=i;
- }
-#pragma omp critical
- {
- sum= sum+sum0;
- } /*end of critical*/
- }
- }/* end of parallel sections*/
- </ompts:orphan>
- known_sum=(999*1000)/2;
- return ((known_sum==sum) && (i0==999) );
-}
-</ompts:testcode>
-</ompts:test>
OpenPOWER on IntegriCloud