aboutsummaryrefslogtreecommitdiff
path: root/libgomp/openacc.f90
diff options
context:
space:
mode:
authorThomas Schwinge <thomas@codesourcery.com>2020-04-29 08:12:36 +0200
committerThomas Schwinge <thomas@codesourcery.com>2020-04-29 09:54:37 +0200
commita5d0bc12e1bfa956941cd9c49d5b978256bd11ec (patch)
tree34e79c2f6820956938f414465f5600c9c261951d /libgomp/openacc.f90
parentd20219b5ab26cd003ae78ac9f82be337fe4df261 (diff)
[OpenACC] Set 'acc_device_current = -1'
There's no point in using value '-3', and even though not directly related, value '-1' does match 'GOMP_DEVICE_ICV'. libgomp/ * config/accel/openacc.f90 (acc_device_current): Set to '-1'. * openacc.f90 (acc_device_current): Likewise. * openacc.h (acc_device_current): Likewise. * openacc_lib.h (acc_device_current): Likewise.
Diffstat (limited to 'libgomp/openacc.f90')
-rw-r--r--libgomp/openacc.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/libgomp/openacc.f90 b/libgomp/openacc.f90
index 467fb612c54..111705d0fb6 100644
--- a/libgomp/openacc.f90
+++ b/libgomp/openacc.f90
@@ -41,7 +41,7 @@ module openacc_kinds
integer, parameter :: acc_device_kind = int32
! Keep in sync with include/gomp-constants.h.
- integer (acc_device_kind), parameter :: acc_device_current = -3
+ integer (acc_device_kind), parameter :: acc_device_current = -1
integer (acc_device_kind), parameter :: acc_device_none = 0
integer (acc_device_kind), parameter :: acc_device_default = 1
integer (acc_device_kind), parameter :: acc_device_host = 2