gcc/testsuite/c-c++-common/gomp/teams-1.c

   1 #ifdef __cplusplus
   2 extern "C" {
   3 #endif
   4
   5 int omp_get_num_teams (void);
   6 int omp_get_team_num (void);
   7
   8 #ifdef __cplusplus
   9 }
  10 #endif
  11
  12 void bar (int *, int *, int *, int, int, int, int);
  13
  14 void
  15 foo (void)
  16 {
  17   int a = 1, b = 2, c = 3, d = 4, e = 5, f = 6;
  18   #pragma omp teams num_teams (4) shared (b) firstprivate (c, d) private (e, f)
  19   {
  20     f = 7;
  21     bar (&a, &c, &e, b, d, f, 0);
  22   }
  23   bar (&a, (int *) 0, (int *) 0, b, 0, 0, 1);
  24 }
  25
  26 void
  27 baz (void)
  28 {
  29   #pragma omp teams
  30   {
  31     #pragma omp distribute
  32     for (int i = 0; i < 64; i++)
  33       ;
  34     #pragma omp distribute simd
  35     for (int i = 0; i < 64; i++)
  36       ;
  37     #pragma omp distribute parallel for
  38     for (int i = 0; i < 64; i++)
  39       ;
  40     #pragma omp distribute parallel for
  41     for (int i = 0; i < 64; i++)
  42       ;
  43     #pragma omp distribute parallel for simd
  44     for (int i = 0; i < 64; i++)
  45       ;
  46     #pragma omp parallel
  47     ;
  48     #pragma omp parallel for
  49     for (int i = 0; i < 64; i++)
  50       ;
  51     #pragma omp parallel for simd
  52     for (int i = 0; i < 64; i++)
  53       ;
  54     int a, b;
  55     #pragma omp parallel sections
  56     {
  57       a = 5;
  58       #pragma omp section
  59       b = 6;
  60     }
  61     int c = omp_get_num_teams ();
  62     int d = omp_get_team_num ();
  63   }
  64 }