1  #pragma omp error			/* { dg-error "'pragma omp error' encountered" } */
       2  #pragma omp error at(compilation)	/* { dg-error "'pragma omp error' encountered" } */
       3  #pragma omp error severity(fatal)	/* { dg-error "'pragma omp error' encountered" } */
       4  #pragma omp error message("my msg")	/* { dg-error "'pragma omp error' encountered: my msg" } */
       5  #pragma omp error severity(warning)message("another message")at(compilation)	/* { dg-warning "'pragma omp error' encountered: another message" } */
       6  
       7  struct S {
       8    #pragma omp error			/* { dg-error "'pragma omp error' encountered" } */
       9    #pragma omp error at(compilation)	/* { dg-error "'pragma omp error' encountered" } */
      10    #pragma omp error severity(fatal)	/* { dg-error "'pragma omp error' encountered" } */
      11    #pragma omp error message("42")	/* { dg-error "'pragma omp error' encountered: 42" } */
      12    #pragma omp error severity(warning), message("foo"), at(compilation)	/* { dg-warning "'pragma omp error' encountered: foo" } */
      13    int s;
      14  };
      15  
      16  int
      17  foo (int i, int x)
      18  {
      19    #pragma omp error			/* { dg-error "'pragma omp error' encountered" } */
      20    #pragma omp error at(compilation)	/* { dg-error "'pragma omp error' encountered" } */
      21    #pragma omp error severity(fatal)	/* { dg-error "'pragma omp error' encountered" } */
      22    #pragma omp error message("42 / 1")	/* { dg-error "'pragma omp error' encountered: 42 / 1" } */
      23    #pragma omp error severity(warning) message("bar") at(compilation)	/* { dg-warning "'pragma omp error' encountered: bar" } */
      24    if (x)
      25      #pragma omp error			/* { dg-error "'pragma omp error' encountered" } */
      26      i++;
      27    if (x)
      28      ;
      29    else
      30      #pragma omp error at(compilation)	/* { dg-error "'pragma omp error' encountered" } */
      31      i++;
      32    switch (0)
      33      #pragma omp error severity(fatal)	/* { dg-error "'pragma omp error' encountered" } */
      34      {
      35      default:
      36        break;
      37      }
      38    while (0)
      39      #pragma omp error message("42 - 1")	/* { dg-error "'pragma omp error' encountered: 42 - 1" } */
      40      i++;
      41    lab:
      42    #pragma omp error severity(warning) message("bar") at(compilation)	/* { dg-warning "'pragma omp error' encountered: bar" } */
      43      i++;
      44    return i;
      45  }