LLVM OpenMP 20.0.0git
omp_parallel_sections_firstprivate.c
Go to the documentation of this file.
1// RUN: %libomp-compile-and-run
2#include <stdio.h>
3#include "omp_testsuite.h"
4
6{
7 int sum;
8 int sum0;
9 int known_sum;
10
11 sum =7;
12 sum0=11;
13
14 #pragma omp parallel sections firstprivate(sum0)
15 {
16 #pragma omp section
17 {
18 #pragma omp critical
19 {
20 sum= sum+sum0;
21 }
22 }
23 #pragma omp section
24 {
25 #pragma omp critical
26 {
27 sum= sum+sum0;
28 }
29 }
30 #pragma omp section
31 {
32 #pragma omp critical
33 {
34 sum= sum+sum0;
35 }
36 }
37 }
38
39 known_sum=11*3+7;
40 return (known_sum==sum);
41} /* end of check_section_firstprivate*/
42
43int main()
44{
45 int i;
46 int num_failed=0;
47
48 for(i = 0; i < REPETITIONS; i++) {
50 num_failed++;
51 }
52 }
53 return num_failed;
54}
#define i
Definition: kmp_stub.cpp:87
int test_omp_parallel_sections_firstprivate()
#define REPETITIONS
Definition: omp_testsuite.h:13
static int sum0