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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [c-c++-common/] [gomp/] [pr51360.c] - Blame information for rev 709

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

Line No. Rev Author Line
1 686 jeremybenn
/* PR c/51360 */
2
/* { dg-do compile } */
3
/* { dg-options "-Wunused -W -fopenmp" } */
4
 
5
void
6
foo (int a, int b, int c, int d)
7
{
8
  int m, n, o, p, i;
9
  m = 6;
10
  n = 1;
11
  o = 5;
12
  p = 1;
13
  a = 6;
14
  b = 1;
15
  c = 5;
16
  d = 1;
17
  #pragma omp parallel for num_threads (m) if (n) schedule (static, o)
18
  for (i = 0; i < 10; i++)
19
    ;
20
  #pragma omp parallel for num_threads (a) if (b) schedule (static, c)
21
  for (i = 0; i < 10; i++)
22
    ;
23
  #pragma omp task final (p)
24
    ;
25
  #pragma omp task final (d)
26
    ;
27
}

powered by: WebSVN 2.1.0

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