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)