URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [gomp/] [macro-4.C] - Blame information for rev 774

Go to most recent revision | Details | Compare with Previous | View Log


// 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 ();
}

Line No.	Rev	Author	Line
1	693	jeremybenn	`// PR preprocessor/27746`
2			`// { dg-do compile }`
3			`// { dg-options "-fopenmp -Wunknown-pragmas" }`
4
5			`#define p _Pragma ("omp parallel")`
6			`#define omp_p _Pragma ("omp p")`
7
8			`void bar (void);`
9
10			`void`
11			`foo (void)`
12			`{`
13			`#pragma omp p // { dg-warning "ignoring #pragma omp _Pragma" }`
14			`bar ();`
15			`omp_p // { dg-warning "ignoring #pragma omp _Pragma" }`
16			`bar ();`
17			`}`
18
19			`#define parallel serial`
20			`#define omp_parallel _Pragma ("omp parallel")`
21
22			`void`
23			`baz (void)`
24			`{`
25			`#pragma omp parallel // { dg-warning "ignoring #pragma omp serial" }`
26			`bar ();`
27			`omp_parallel // { dg-warning "ignoring #pragma omp serial" }`
28			`bar ();`
29			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [gomp/] [macro-4.C] - Blame information for rev 774