13 lines · c
1// RUN: %clang_cc1 -verify -fopenmp -ferror-limit 100 -o - %s2 3// Test the reaction to some Fortran-only directives.4 5void foo() {6#pragma omp allocators // expected-error {{expected an OpenMP directive}}7#pragma omp do // expected-error {{expected an OpenMP directive}}8#pragma omp end workshare // expected-error {{expected an OpenMP directive}}9#pragma omp parallel workshare // expected-warning {{extra tokens at the end of '#pragma omp parallel' are ignored}}10#pragma omp workshare // expected-error {{expected an OpenMP directive}}11}12 13