Mercurial > hg > CbC > CbC_gcc

view gcc/testsuite/g++.dg/gomp/macro-4.C @ 158:494b0b89df80 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 1830386684a0
children
line wrap: on
line source

// PR preprocessor/27746
// { dg-do compile }
// { dg-options "-fopenmp -Wunknown-pragmas" }

#define p		_Pragma ("omp parallel")
#define omp_p		_Pragma ("omp p")

void bar (void);

void
foo (void)
{
#pragma omp p		// { dg-warning "-:ignoring '#pragma omp _Pragma'" }
    bar ();
  omp_p			// { dg-warning "-:ignoring '#pragma omp _Pragma'" }
    bar ();
}

#define parallel	serial
#define omp_parallel	_Pragma ("omp parallel")

void
baz (void)
{
#pragma omp parallel	// { dg-warning "-:ignoring '#pragma omp serial'" }
    bar ();
  omp_parallel		// { dg-warning "-:ignoring '#pragma omp serial'" }
    bar ();
}