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

Subversion Repositories openrisc

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

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 693 jeremybenn
// PR middle-end/27415
2
// { dg-do compile }
3
 
4
void
5
test1 (void)
6
{
7
  int i = 0;
8
#pragma omp parallel
9
#pragma omp for firstprivate (i)                // { dg-error "should not be firstprivate" }
10
  for (i = 0; i < 10; i++)
11
    ;
12
}
13
 
14
void
15
test2 (void)
16
{
17
  int i = 0;
18
#pragma omp parallel for firstprivate (i)
19
  for (i = 0; i < 10; i++)                      // { dg-error "should not be firstprivate" }
20
    ;
21
}
22
 
23
void
24
test3 (void)
25
{
26
  int i = 0;
27
#pragma omp parallel
28
#pragma omp for reduction (+:i)                 // { dg-error "should not be reduction" }
29
  for (i = 0; i < 10; i++)
30
    ;
31
}
32
 
33
void
34
test4 (void)
35
{
36
  int i = 0;
37
#pragma omp parallel for reduction (*:i)
38
  for (i = 0; i < 10; i++)                      // { dg-error "should not be reduction" }
39
    ;
40
}
41
 
42
void
43
test5 (void)
44
{
45
  int i = 0;
46
#pragma omp parallel firstprivate (i)
47
#pragma omp for
48
  for (i = 0; i < 10; i++)
49
    ;
50
}

powered by: WebSVN 2.1.0

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