summaryrefslogtreecommitdiffstats
path: root/openmp/runtime/src/include/40/omp_lib.f.var
diff options
context:
space:
mode:
Diffstat (limited to 'openmp/runtime/src/include/40/omp_lib.f.var')
-rw-r--r--openmp/runtime/src/include/40/omp_lib.f.var34
1 files changed, 0 insertions, 34 deletions
diff --git a/openmp/runtime/src/include/40/omp_lib.f.var b/openmp/runtime/src/include/40/omp_lib.f.var
index 7cbeb23f692..3a59162b4bb 100644
--- a/openmp/runtime/src/include/40/omp_lib.f.var
+++ b/openmp/runtime/src/include/40/omp_lib.f.var
@@ -31,7 +31,6 @@
integer, parameter :: kmp_size_t_kind = int_ptr_kind()
integer, parameter :: kmp_affinity_mask_kind = int_ptr_kind()
integer, parameter :: kmp_cancel_kind = omp_integer_kind
- integer, parameter :: kmp_lock_hint_kind = omp_integer_kind
end module omp_lib_kinds
@@ -61,15 +60,6 @@
integer (kind=kmp_cancel_kind), parameter :: kmp_cancel_sections = 3
integer (kind=kmp_cancel_kind), parameter :: kmp_cancel_taskgroup = 4
- integer (kind=kmp_lock_hint_kind), parameter :: kmp_lock_hint_none = 0
- integer (kind=kmp_lock_hint_kind), parameter :: kmp_lock_hint_uncontended = 1
- integer (kind=kmp_lock_hint_kind), parameter :: kmp_lock_hint_contended = 2
- integer (kind=kmp_lock_hint_kind), parameter :: kmp_lock_hint_nonspeculative = 3
- integer (kind=kmp_lock_hint_kind), parameter :: kmp_lock_hint_speculative = 4
- integer (kind=kmp_lock_hint_kind), parameter :: kmp_lock_hint_hle = 5
- integer (kind=kmp_lock_hint_kind), parameter :: kmp_lock_hint_rtm = 6
- integer (kind=kmp_lock_hint_kind), parameter :: kmp_lock_hint_adaptive = 7
-
interface
! ***
@@ -447,18 +437,6 @@
logical (kind=omp_logical_kind) kmp_get_cancellation_status
end function kmp_get_cancellation_status
- subroutine kmp_init_lock_hinted(lockvar, lockhint)
- use omp_lib_kinds
- integer (kind=omp_lock_kind) lockvar
- integer (kind=kmp_lock_hint_kind) lockhint
- end subroutine kmp_init_lock_hinted
-
- subroutine kmp_init_nest_lock_hinted(lockvar, lockhint)
- use omp_lib_kinds
- integer (kind=omp_nest_lock_kind) lockvar
- integer (kind=kmp_lock_hint_kind) lockhint
- end subroutine kmp_init_nest_lock_hinted
-
end interface
!dec$ if defined(_WIN32)
@@ -544,9 +522,6 @@
!dec$ attributes alias:'KMP_GET_CANCELLATION_STATUS' :: kmp_get_cancellation_status
-!dec$ attributes alias:'KMP_INIT_LOCK_HINTED'::kmp_init_lock_hinted
-!dec$ attributes alias:'KMP_INIT_NEST_LOCK_HINTED'::kmp_init_nest_lock_hinted
-
!dec$ else
!***
@@ -623,9 +598,6 @@
!dec$ attributes alias:'_KMP_GET_CANCELLATION_STATUS' :: kmp_get_cancellation_status
-!dec$ attributes alias:'_KMP_INIT_LOCK_HINTED'::kmp_init_lock_hinted
-!dec$ attributes alias:'_KMP_INIT_NEST_LOCK_HINTED'::kmp_init_nest_lock_hinted
-
!dec$ endif
!dec$ endif
@@ -704,9 +676,6 @@
!dec$ attributes alias:'kmp_set_warnings_off_'::kmp_set_warnings_off
!dec$ attributes alias:'kmp_get_cancellation_status_'::kmp_get_cancellation_status
-!dec$ attributes alias:'kmp_init_lock_hinted_'::kmp_init_lock_hinted
-!dec$ attributes alias:'kmp_init_nest_lock_hinted_'::kmp_init_nest_lock_hinted
-
!dec$ endif
!dec$ if defined(__APPLE__)
@@ -783,9 +752,6 @@
!dec$ attributes alias:'_kmp_get_cancellation_status_'::kmp_get_cancellation_status
-!dec$ attributes alias:'_kmp_init_lock_hinted_'::kmp_init_lock_hinted
-!dec$ attributes alias:'_kmp_init_nest_lock_hinted_'::kmp_init_nest_lock_hinted
-
!dec$ endif
end module omp_lib
OpenPOWER on IntegriCloud