summaryrefslogtreecommitdiffstats
path: root/openmp/runtime/src/include/41/omp_lib.h.var
diff options
context:
space:
mode:
Diffstat (limited to 'openmp/runtime/src/include/41/omp_lib.h.var')
-rw-r--r--openmp/runtime/src/include/41/omp_lib.h.var5
1 files changed, 5 insertions, 0 deletions
diff --git a/openmp/runtime/src/include/41/omp_lib.h.var b/openmp/runtime/src/include/41/omp_lib.h.var
index a91569dfa46..6750a9511f3 100644
--- a/openmp/runtime/src/include/41/omp_lib.h.var
+++ b/openmp/runtime/src/include/41/omp_lib.h.var
@@ -242,6 +242,11 @@
logical (kind=omp_logical_kind) omp_is_initial_device
end function omp_is_initial_device
+ function omp_get_initial_device() bind(c)
+ import
+ integer (kind=omp_integer_kind) omp_get_initial_device
+ end function omp_get_initial_device
+
subroutine omp_init_lock(lockvar) bind(c)
!DIR$ IF(__INTEL_COMPILER.GE.1400)
!DIR$ attributes known_intrinsic :: omp_init_lock
OpenPOWER on IntegriCloud