38a46a12c4
Fix some tests causing hangs, one fail, and a few XPASSing. We are seeing new passes/fails because of the named barrier changes being merged. Signed-off-by: Nick Sarnie <nick.sarnie@intel.com>
35 lines
709 B
C++
35 lines
709 B
C++
// RUN: %libomptarget-compilexx-run-and-check-generic
|
|
// RUN: %libomptarget-compileoptxx-run-and-check-generic
|
|
|
|
// FIXME: This is a bug in host offload, this should run fine.
|
|
// REQUIRES: gpu
|
|
// UNSUPPORTED: intelgpu
|
|
|
|
#include <iostream>
|
|
#include <vector>
|
|
|
|
#define N 8
|
|
|
|
int main() {
|
|
std::vector<int> avec(N);
|
|
int *a = avec.data();
|
|
#pragma omp parallel for
|
|
for (int i = 0; i < N; i++) {
|
|
a[i] = 0;
|
|
#pragma omp target teams distribute parallel for reduction(+ : a[i])
|
|
for (int j = 0; j < N; j++)
|
|
a[i] += 1;
|
|
}
|
|
|
|
// CHECK: 8
|
|
// CHECK: 8
|
|
// CHECK: 8
|
|
// CHECK: 8
|
|
// CHECK: 8
|
|
// CHECK: 8
|
|
// CHECK: 8
|
|
// CHECK: 8
|
|
for (int i = 0; i < N; i++)
|
|
std::cout << a[i] << std::endl;
|
|
}
|