/* { dg-do compile } */
/* { dg-additional-options "-fdump-tree-gimple" } */

int f0 (void);
int f1 (void);
#pragma omp declare variant (f0) match (construct={dispatch})
#pragma omp declare variant (f1) match (implementation={vendor(gnu)})
int f2 (void);

int test (void)
{
  int a;
#pragma omp dispatch
  a = f2 ();
#pragma omp dispatch novariants(1)
  a = f2 ();
#pragma omp dispatch novariants(0)
  a = f2 ();
#pragma omp dispatch nocontext(1)
  a = f2 ();
#pragma omp dispatch nocontext(0)
  a = f2 ();
  return a;
}

/* { dg-final { scan-tree-dump-times "a = f0 \\\(\\\);" 3 "gimple" } } */
/* { dg-final { scan-tree-dump-times "a = f1 \\\(\\\);" 1 "gimple" } } */
/* { dg-final { scan-tree-dump-times "a = f2 \\\(\\\);" 1 "gimple" } } */