Subversion Repositories openrisc

// PR middle-end/27415

// { dg-do compile }

void

test1 (void)

{

  int i = 0;

#pragma omp parallel

#pragma omp for firstprivate (i)                // { dg-error "should not be firstprivate" }

  for (i = 0; i < 10; i++)

    ;

}

void

test2 (void)

{

  int i = 0;

#pragma omp parallel for firstprivate (i)

  for (i = 0; i < 10; i++)                      // { dg-error "should not be firstprivate" }

    ;

}

void

test3 (void)

{

  int i = 0;

#pragma omp parallel

#pragma omp for reduction (+:i)                 // { dg-error "should not be reduction" }

  for (i = 0; i < 10; i++)

    ;

}

void

test4 (void)

{

  int i = 0;

#pragma omp parallel for reduction (*:i)

  for (i = 0; i < 10; i++)                      // { dg-error "should not be reduction" }

    ;

}

void

test5 (void)

{

  int i = 0;

#pragma omp parallel firstprivate (i)

#pragma omp for

  for (i = 0; i < 10; i++)

    ;

}