1 #ifndef __INT_TIMER_H__ 2 #define __INT_TIMER_H__ 22 #define TAU_FSTART(ARG) \ 23 do { CTF::Timer t(#ARG); t.start(); } while (0); 25 #define TAU_FSTOP(ARG) \ 26 do { CTF::Timer t(#ARG); t.stop(); } while (0); 28 #define TAU_PROFILE_TIMER(ARG1, ARG2, ARG3, ARG4) 30 #define TAU_PROFILE_INIT(argc, argv) \ 31 CTF::set_main_args(argc, argv); 33 #define TAU_PROFILE_SET_NODE(ARG) 35 #define TAU_PROFILE_START(ARG) \ 36 CTF::Timer __CTF::Timer##ARG(#ARG); 38 #define TAU_PROFILE_STOP(ARG) \ 39 __CTF::Timer##ARG.stop(); 41 #define TAU_PROFILE_SET_CONTEXT(ARG) \ 42 if (ARG==0) CTF::set_context(MPI_COMM_WORLD); \ 43 else CTF::set_context((MPI_Comm)ARG); void set_main_args(int argc, const char *const *argv)