blob: 31e13b0050d4127c3203e3d39c7bf2934d96c259 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
// RUN: %libomptarget-compile-run-and-check-generic
#include <omp.h>
#include <stdio.h>
int test_omp_get_device_num() {
/* checks that omp_get_device_num() == omp_get_num_devices() in the host */
int device_num = omp_get_device_num();
printf("device_num = %d\n", device_num);
#pragma omp target
{}
return (device_num == omp_get_num_devices());
}
int main() {
int i;
int failed = 0;
if (!test_omp_get_device_num()) {
failed++;
}
if (failed)
printf("FAIL\n");
else
printf("PASS\n");
return failed;
}
// CHECK: PASS
|