gcc/testsuite/gcc.dg/gomp/appendix-a/a.10.1.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

/* { dg-do compile } */

#include <stdio.h>
void
work1 ()
{
}

void
work2 ()
{
}
void
a10 ()
{
#pragma omp parallel
  {
#pragma omp single
    printf ("Beginning work1.\n");
    work1 ();
#pragma omp single
    printf ("Finishing work1.\n");
#pragma omp single nowait
    printf ("Finished work1 and beginning work2.\n");
    work2 ();
  }
}