diff options
| author | Joachim Protze <protze@itc.rwth-aachen.de> | 2017-12-21 14:36:30 +0000 |
|---|---|---|
| committer | Joachim Protze <protze@itc.rwth-aachen.de> | 2017-12-21 14:36:30 +0000 |
| commit | f375f4b49a72cf11e512aeaf25c2944d3d0b0a67 (patch) | |
| tree | 8e7c9c02c338cb1b355ada3d6217bb1767de2526 /openmp/runtime/src | |
| parent | 636510a702ca5bdf938942e1b59f840c23435265 (diff) | |
| download | bcm5719-llvm-f375f4b49a72cf11e512aeaf25c2944d3d0b0a67.tar.gz bcm5719-llvm-f375f4b49a72cf11e512aeaf25c2944d3d0b0a67.zip | |
[OMPT] Add missing ompt_get_num_procs function
This function is defined in OpenMP-TR6 section 4.1.5.1.6
The functions was not implemented yet.
Since ompt-functions can only be called after the runtime was initialized and
has loaded a tool, it can assume the runtime to be initialized. In contrast
to omp_get_num_procs which needs to check whether the runtime is initialized.
Differential Revision: https://reviews.llvm.org/D40949
llvm-svn: 321269
Diffstat (limited to 'openmp/runtime/src')
| -rw-r--r-- | openmp/runtime/src/include/50/ompt.h.var | 4 | ||||
| -rw-r--r-- | openmp/runtime/src/ompt-general.cpp | 9 |
2 files changed, 13 insertions, 0 deletions
diff --git a/openmp/runtime/src/include/50/ompt.h.var b/openmp/runtime/src/include/50/ompt.h.var index 0cae6a0f69d..930822d2269 100644 --- a/openmp/runtime/src/include/50/ompt.h.var +++ b/openmp/runtime/src/include/50/ompt.h.var @@ -32,6 +32,7 @@ macro (ompt_get_thread_data) \ macro (ompt_get_unique_id) \ \ + macro(ompt_get_num_procs) \ macro(ompt_get_num_places) \ macro(ompt_get_place_proc_ids) \ macro(ompt_get_place_num) \ @@ -582,6 +583,9 @@ OMPT_API_FUNCTION(int, ompt_get_task_info, ( int *thread_num )); +/* procs */ +OMPT_API_FUNCTION(int, ompt_get_num_procs, (void)); + /* places */ OMPT_API_FUNCTION(int, ompt_get_num_places, (void)); diff --git a/openmp/runtime/src/ompt-general.cpp b/openmp/runtime/src/ompt-general.cpp index 9f21214f808..7e1c67a7c26 100644 --- a/openmp/runtime/src/ompt-general.cpp +++ b/openmp/runtime/src/ompt-general.cpp @@ -491,6 +491,15 @@ OMPT_API_ROUTINE int ompt_get_task_info(int ancestor_level, int *type, } /***************************************************************************** + * num_procs + ****************************************************************************/ + +OMPT_API_ROUTINE int ompt_get_num_procs(void) { +// copied from kmp_ftn_entry.h (but modified: OMPT can only be called when runtime is initialized) + return __kmp_avail_proc; +} + +/***************************************************************************** * places ****************************************************************************/ |
