diff options
author | Thomas Schwinge <thomas@codesourcery.com> | 2020-04-29 08:12:36 +0200 |
---|---|---|
committer | Thomas Schwinge <thomas@codesourcery.com> | 2020-04-29 09:54:37 +0200 |
commit | a5d0bc12e1bfa956941cd9c49d5b978256bd11ec (patch) | |
tree | 34e79c2f6820956938f414465f5600c9c261951d /libgomp/openacc.f90 | |
parent | d20219b5ab26cd003ae78ac9f82be337fe4df261 (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.f90 | 2 |
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 |