Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/gcc.dg/gomp/pr49640.c @ 131:84e7813d76e9
gcc-8.2
author | mir3636 |
---|---|
date | Thu, 25 Oct 2018 07:37:49 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
/* PR middle-end/49640 */ /* { dg-do compile } */ /* { dg-options "-O2 -std=gnu99 -fopenmp" } */ void foo (int N, int M, int K, int P, int Q, int R, int i, int j, int k, unsigned char x[P][Q][R], int y[N][M][K]) { int ii, jj, kk; #pragma omp parallel for private(ii,jj,kk) for (ii = 0; ii < P; ++ii) for (jj = 0; jj < Q; ++jj) for (kk = 0; kk < R; ++kk) y[i + ii][j + jj][k + kk] = x[ii][jj][kk]; } void bar (int N, int M, int K, int P, int Q, int R, int i, int j, int k, unsigned char x[P][Q][R], float y[N][M][K], float factor, float zero) { int ii, jj, kk; #pragma omp parallel for private(ii,jj,kk) for (ii = 0; ii < P; ++ii) for (jj = 0; jj < Q; ++jj) for (kk = 0; kk < R; ++kk) y[i + ii][j + jj][k + kk] = factor * x[ii][jj][kk] + zero; }