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

Subversion Repositories openrisc

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

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

Line No. Rev Author Line
1 693 jeremybenn
// PR c++/32177
2
// { dg-do compile }
3
// { dg-options "-fopenmp" }
4
//
5
// Copyright (C) 2007 Free Software Foundation, Inc.
6
// Contributed by Theodore.Papadopoulo 1 Jun 2007 
7
 
8
struct A
9
{
10
  A () {}
11
  ~A () {}
12
  int s () const { return 1; }
13
};
14
 
15
void
16
f1 ()
17
{
18
  #pragma omp parallel for
19
    for (int i = 1; i <= A ().s (); ++i)
20
      ;
21
}
22
 
23
void
24
f2 ()
25
{
26
  #pragma omp parallel for
27
    for (int i = A ().s (); i <= 20; ++i)
28
      ;
29
}
30
 
31
void
32
f3 ()
33
{
34
  #pragma omp parallel for
35
    for (int i = 1; i <= 20; i += A ().s ())
36
      ;
37
}
38
 
39
void
40
f4 ()
41
{
42
  int i;
43
  #pragma omp parallel for
44
    for (i = A ().s (); i <= 20; i++)
45
      ;
46
}

powered by: WebSVN 2.1.0

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