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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [g++.dg/] [gomp/] [macro-4.C] - Blame information for rev 856

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

Line No. Rev Author Line
1 149 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
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.