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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [clause-2.c] - Blame information for rev 298

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 298 jeremybenn
/* PR c/34506 */
2
/* { dg-do compile } */
3
 
4
#define p parallel
5
 
6
void
7
foo (int x)
8
{
9
#pragma omp p num_threads (4) if (1) private (x)
10
    ;
11
#pragma omp p num_threads(4)if(1)private(x)
12
    ;
13
#pragma omp p num_threads (4), if (1) , private (x)
14
    ;
15
#pragma omp p num_threads(4),if(1),private(x)
16
    ;
17
#pragma omp p, num_threads (4), if (1), private (x)     /* { dg-error "clause before" } */
18
    ;
19
#pragma omp p num_threads (4), if (1), private (x),     /* { dg-error "clause before" } */
20
    ;
21
#pragma omp p num_threads (4), , if (1), private (x)    /* { dg-error "clause before" } */
22
    ;
23
}

powered by: WebSVN 2.1.0

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