From c754fd125677cc842e0b18ae98581c34937a6c64 Mon Sep 17 00:00:00 2001 From: Izaak Beekman Date: Sun, 15 Dec 2024 15:31:40 -0500 Subject: [PATCH] Use a parent node in the config file for the Fortran instrumentation --- config_files/tau_fortran_config.yaml | 37 ++++++++++++++-------------- 1 file changed, 18 insertions(+), 19 deletions(-) diff --git a/config_files/tau_fortran_config.yaml b/config_files/tau_fortran_config.yaml index 8e40eb9..cc87b4a 100644 --- a/config_files/tau_fortran_config.yaml +++ b/config_files/tau_fortran_config.yaml @@ -1,24 +1,23 @@ +Fortran: # Config variables: # ${full_timer_name}: "procedure_name [file_path {start}-{end}]" + instrumentation: tauFortran + program_insert: + - " integer, save :: tauProfileTimer(2) = [0, 0]" + - " call TAU_PROFILE_INIT()" + - " call TAU_PROFILE_TIMER(tauProfileTimer, \"${full_timer_name}&" + - " &\")" + - " call TAU_PROFILE_START(tauProfileTimer)" + - "#ifndef TAU_MPI" + - " call TAU_PROFILE_SET_NODE(0)" + - "#endif" -instrumentation: tauFortran -program_insert: - - " integer, save :: tauProfileTimer(2) = [0, 0]" - - " call TAU_PROFILE_INIT()" - - " call TAU_PROFILE_TIMER(tauProfileTimer, \"${full_timer_name}&" - - " &\")" - - " call TAU_PROFILE_START(tauProfileTimer)" - - "#ifndef TAU_MPI" - - " call TAU_PROFILE_SET_NODE(0)" - - "#endif" + procedure_begin_insert: + - " integer, save :: tauProfileTimer(2) = [0, 0]" + - " call TAU_PROFILE_TIMER(tauProfileTimer, \"${full_timer_name}&" + - " &\")" + - " call TAU_PROFILE_START(tauProfileTimer)" - -procedure_begin_insert: - - " integer, save :: tauProfileTimer(2) = [0, 0]" - - " call TAU_PROFILE_TIMER(tauProfileTimer, \"${full_timer_name}&" - - " &\")" - - " call TAU_PROFILE_START(tauProfileTimer)" - -procedure_end_insert: - - " call TAU_PROFILE_STOP(tauProfileTimer)" + procedure_end_insert: + - " call TAU_PROFILE_STOP(tauProfileTimer)"