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

28 lines
342 B
C

/* { 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 ();
}
}