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>
24 lines
577 B
C++
24 lines
577 B
C++
// RUN: %libomptarget-compilexx-run-and-check-generic
|
|
// UNSUPPORTED: intelgpu
|
|
|
|
#include <stdio.h>
|
|
|
|
void sum(int *input, int size, int *output) {
|
|
#pragma omp target teams distribute parallel for reduction(+ : output[0]) \
|
|
map(to : input[0 : size])
|
|
for (int i = 0; i < size; i++)
|
|
output[0] += input[i];
|
|
}
|
|
int main() {
|
|
const int size = 100;
|
|
int *array = new int[size];
|
|
int result = 0;
|
|
for (int i = 0; i < size; i++)
|
|
array[i] = i + 1;
|
|
sum(array, size, &result);
|
|
// CHECK: Result=5050
|
|
printf("Result=%d\n", result);
|
|
delete[] array;
|
|
return 0;
|
|
}
|