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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [g++.dg/] [gomp/] [predetermined-1.C] - Diff between revs 301 and 338

Only display areas with differences | Details | Blame | View Log

Rev 301 Rev 338
// { dg-do compile }
// { dg-do compile }
// { dg-options "-fopenmp" }
// { dg-options "-fopenmp" }
struct A { int i; A (); ~A (); };
struct A { int i; A (); ~A (); };
struct B { int i; };
struct B { int i; };
struct C { int i; mutable int j; C (); ~C (); };
struct C { int i; mutable int j; C (); ~C (); };
template  void bar (const T *);
template  void bar (const T *);
const A a;
const A a;
const C c;
const C c;
const A foo (const A d, const C e)
const A foo (const A d, const C e)
{
{
  const A f;
  const A f;
  const B b = { 4 };
  const B b = { 4 };
  A g;
  A g;
  #pragma omp parallel default (none)
  #pragma omp parallel default (none)
    bar (&a);
    bar (&a);
  #pragma omp parallel default (none)
  #pragma omp parallel default (none)
    bar (&b);
    bar (&b);
  #pragma omp parallel default (none)   // { dg-error "enclosing parallel" }
  #pragma omp parallel default (none)   // { dg-error "enclosing parallel" }
    bar (&c);                              // { dg-error "not specified" }
    bar (&c);                              // { dg-error "not specified" }
  #pragma omp parallel default (none)
  #pragma omp parallel default (none)
    bar (&d);
    bar (&d);
  #pragma omp parallel default (none)   // { dg-error "enclosing parallel" }
  #pragma omp parallel default (none)   // { dg-error "enclosing parallel" }
    bar (&e);                              // { dg-error "not specified" }
    bar (&e);                              // { dg-error "not specified" }
  #pragma omp parallel default (none)
  #pragma omp parallel default (none)
    bar (&f);
    bar (&f);
  #pragma omp parallel default (none)   // { dg-error "enclosing parallel" }
  #pragma omp parallel default (none)   // { dg-error "enclosing parallel" }
    bar (&g);                              // { dg-error "not specified" }
    bar (&g);                              // { dg-error "not specified" }
  return f;
  return f;
}
}
 
 

powered by: WebSVN 2.1.0

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