diff options
Diffstat (limited to 'libgomp/icv-device.c')
-rw-r--r-- | libgomp/icv-device.c | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/libgomp/icv-device.c b/libgomp/icv-device.c index ba06f50..40bf7cd 100644 --- a/libgomp/icv-device.c +++ b/libgomp/icv-device.c @@ -32,8 +32,11 @@ void omp_set_default_device (int device_num) { - struct gomp_task_icv *icv = gomp_icv (true); - icv->default_device_var = device_num; + if (device_num != GOMP_DEVICE_DEFAULT_OMP_61) + { + struct gomp_task_icv *icv = gomp_icv (true); + icv->default_device_var = device_num; + } } ialias (omp_set_default_device) |