7 int host_device_num
= omp_get_device_num ();
9 if (host_device_num
!= omp_get_initial_device ())
15 for (int i
= 0; i
<= omp_get_num_devices (); i
++)
17 #pragma omp target map(from: device_num, initial_device) device(i)
19 initial_device
= omp_is_initial_device ();
20 device_num
= omp_get_device_num ();
26 if (initial_device
&& host_device_num
!= device_num
)
29 if (!initial_device
&& host_device_num
== device_num
)