diff options
Diffstat (limited to 'openmp/runtime/src/include')
-rw-r--r-- | openmp/runtime/src/include/50/omp.h.var | 2 | ||||
-rw-r--r-- | openmp/runtime/src/include/50/omp_lib.f.var | 9 | ||||
-rw-r--r-- | openmp/runtime/src/include/50/omp_lib.f90.var | 5 | ||||
-rw-r--r-- | openmp/runtime/src/include/50/omp_lib.h.var | 7 |
4 files changed, 23 insertions, 0 deletions
diff --git a/openmp/runtime/src/include/50/omp.h.var b/openmp/runtime/src/include/50/omp.h.var index 11956f037dc..ac5fada237a 100644 --- a/openmp/runtime/src/include/50/omp.h.var +++ b/openmp/runtime/src/include/50/omp.h.var @@ -257,6 +257,8 @@ extern int __KAI_KMPC_CONVENTION omp_pause_resource(omp_pause_resource_t, int); extern int __KAI_KMPC_CONVENTION omp_pause_resource_all(omp_pause_resource_t); + extern int __KAI_KMPC_CONVENTION omp_get_supported_active_levels(void); + # undef __KAI_KMPC_CONVENTION # undef __KMP_IMP diff --git a/openmp/runtime/src/include/50/omp_lib.f.var b/openmp/runtime/src/include/50/omp_lib.f.var index 892e98e90a7..87669a82afc 100644 --- a/openmp/runtime/src/include/50/omp_lib.f.var +++ b/openmp/runtime/src/include/50/omp_lib.f.var @@ -301,6 +301,11 @@ integer (kind=omp_integer_kind) omp_pause_resource_all end function omp_pause_resource_all + function omp_get_supported_active_levels() + use omp_lib_kinds + integer (kind=omp_integer_kind) omp_get_supported_active_levels + end function omp_get_supported_active_levels + subroutine omp_init_lock(svar) !DIR$ IF(__INTEL_COMPILER.GE.1400) !DIR$ attributes known_intrinsic :: omp_init_lock @@ -641,6 +646,7 @@ !dec$ attributes alias:'OMP_GET_DEVICE_NUM' :: omp_get_device_num !dec$ attributes alias:'OMP_PAUSE_RESOURCE' :: omp_pause_resource !dec$ attributes alias:'OMP_PAUSE_RESOURCE_ALL' :: omp_pause_resource_all +!dec$ attributes alias:'OMP_GET_SUPPORTED_ACTIVE_LEVELS' :: omp_get_supported_active_levels !dec$ attributes alias:'OMP_CONTROL_TOOL' :: omp_control_tool !dec$ attributes alias:'OMP_SET_AFFINITY_FORMAT' :: omp_set_affinity_format @@ -731,6 +737,7 @@ !dec$ attributes alias:'_OMP_GET_DEVICE_NUM' :: omp_get_device_num !dec$ attributes alias:'_OMP_PAUSE_RESOURCE' :: omp_pause_resource !dec$ attributes alias:'_OMP_PAUSE_RESOURCE_ALL' :: omp_pause_resource_all +!dec$ attributes alias:'_OMP_GET_SUPPORTED_ACTIVE_LEVELS' :: omp_get_supported_active_levels !dec$ attributes alias:'_OMP_CONTROL_TOOL' :: omp_control_tool !dec$ attributes alias:'_OMP_SET_AFFINITY_FORMAT' :: omp_set_affinity_format @@ -824,6 +831,7 @@ !dec$ attributes alias:'omp_get_device_num_'::omp_get_device_num !dec$ attributes alias:'omp_pause_resource_' :: omp_pause_resource !dec$ attributes alias:'omp_pause_resource_all_' :: omp_pause_resource_all +!dec$ attributes alias:'omp_get_supported_active_levels_' :: omp_get_supported_active_levels !dec$ attributes alias:'omp_set_affinity_format_' :: omp_set_affinity_format !dec$ attributes alias:'omp_get_affinity_format_' :: omp_get_affinity_format @@ -916,6 +924,7 @@ !dec$ attributes alias:'_omp_get_device_num_'::omp_get_device_num !dec$ attributes alias:'_omp_pause_resource_' :: omp_pause_resource !dec$ attributes alias:'_omp_pause_resource_all_' :: omp_pause_resource_all +!dec$ attributes alias:'_omp_get_supported_active_levels_' :: omp_get_supported_active_levels !dec$ attributes alias:'_omp_init_lock_'::omp_init_lock !dec$ attributes alias:'_omp_init_lock_with_hint_'::omp_init_lock_with_hint diff --git a/openmp/runtime/src/include/50/omp_lib.f90.var b/openmp/runtime/src/include/50/omp_lib.f90.var index 5d8b12ff1e1..a5d40230f23 100644 --- a/openmp/runtime/src/include/50/omp_lib.f90.var +++ b/openmp/runtime/src/include/50/omp_lib.f90.var @@ -317,6 +317,11 @@ integer (kind=omp_integer_kind) omp_pause_resource_all end function omp_pause_resource_all + function omp_get_supported_active_levels() bind(c) + use omp_lib_kinds + integer (kind=omp_integer_kind) omp_get_supported_active_levels + end function omp_get_supported_active_levels + subroutine omp_init_lock(svar) bind(c) !DIR$ IF(__INTEL_COMPILER.GE.1400) !DIR$ attributes known_intrinsic :: omp_init_lock diff --git a/openmp/runtime/src/include/50/omp_lib.h.var b/openmp/runtime/src/include/50/omp_lib.h.var index 5bb01ed0722..830eaaf5c32 100644 --- a/openmp/runtime/src/include/50/omp_lib.h.var +++ b/openmp/runtime/src/include/50/omp_lib.h.var @@ -352,6 +352,11 @@ integer (kind=omp_integer_kind) omp_pause_resource_all end function omp_pause_resource_all + function omp_get_supported_active_levels() bind(c) + import + integer (kind=omp_integer_kind) omp_get_supported_active_levels + end function omp_get_supported_active_levels + subroutine omp_init_lock(svar) bind(c) !DIR$ IF(__INTEL_COMPILER.GE.1400) !DIR$ attributes known_intrinsic :: omp_init_lock @@ -674,6 +679,7 @@ !DIR$ ATTRIBUTES OFFLOAD:MIC :: omp_get_device_num !DIR$ ATTRIBUTES OFFLOAD:MIC :: omp_pause_resource !DIR$ ATTRIBUTES OFFLOAD:MIC :: omp_pause_resource_all +!DIR$ ATTRIBUTES OFFLOAD:MIC :: omp_get_supported_active_levels !DIR$ ATTRIBUTES OFFLOAD:MIC :: omp_get_num_teams !DIR$ ATTRIBUTES OFFLOAD:MIC :: omp_get_team_num !DIR$ ATTRIBUTES OFFLOAD:MIC :: omp_init_lock @@ -755,6 +761,7 @@ !$omp declare target(omp_get_device_num ) !$omp declare target(omp_pause_resource ) !$omp declare target(omp_pause_resource_all ) +!$omp declare target(omp_get_supported_active_levels ) !$omp declare target(omp_get_num_teams ) !$omp declare target(omp_get_team_num ) !$omp declare target(omp_init_lock ) |