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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [macro-4.c] - Blame information for rev 708

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

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