*** src/BackEnd.C 2008-06-17 18:19:00.726995501 -0500 --- src/BackEnd.C 2006-06-06 00:30:53.000000000 -0500 *************** *** 4,12 **** *** All rights reserved. **/ - #include - extern "C" void Tau_create_top_level_timer_if_necessary(void); - #include "BackEnd.h" #include "ProcessorPrivate.h" #include "common.h" --- 4,9 ---- *************** *** 100,113 **** // called by main on one or all procs void BackEnd::init(int argc, char **argv) { ConverseInit(argc, argv, slave_init, 1, 1); // calls slave_init on others - TAU_PROFILE_SET_NODE(CmiMyPe()); - Tau_create_top_level_timer_if_necessary(); - TAU_PROFILE("BackEnd::init", "", TAU_DEFAULT); cpuTime_start = CmiCpuTimer(); wallTime_start = CmiWallTimer(); if ( CmiMyPe() ) { slave_init(argc, argv); // for procs that call main - TAU_PROFILE_EXIT("Calling ConverseExit()"); ConverseExit(); // should never return } all_init(argc, argv); --- 97,106 ---- *** src/Controller.C 2008-06-17 19:02:39.703682770 -0500 --- src/Controller.C 2006-08-21 17:46:47.000000000 -0500 *************** *** 4,10 **** *** All rights reserved. **/ - #include "TAU.h" #include "InfoStream.h" #include "memusage.h" #include "Node.h" --- 4,9 ---- *************** *** 196,202 **** void Controller::threadRun(Controller* arg) { - TAU_REGISTER_THREAD(); arg->algorithm(); } --- 195,200 ---- *************** *** 1787,1793 **** } void Controller::terminate(void) { - TAU_PROFILE_EXIT("Controller::terminate"); BackEnd::awaken(); CthFree(thread); CthSuspend(); --- 1785,1790 ---- *** src/mainfunc.C 2008-06-17 18:19:00.816996077 -0500 --- src/mainfunc.C 2006-02-04 22:32:48.000000000 -0600 *************** *** 3,9 **** *** The Board of Trustees of the University of Illinois. *** All rights reserved. **/ ! #include #include "memusage.h" #include "converse.h" #include "common.h" --- 3,9 ---- *** The Board of Trustees of the University of Illinois. *** All rights reserved. **/ ! #include "memusage.h" #include "converse.h" #include "common.h" *************** *** 32,38 **** int main(int argc, char **argv) { BackEnd::init(argc,argv); - TAU_PROFILE("int main(int, char**) C", " ", TAU_DEFAULT); ScriptTcl *script = new ScriptTcl; Node::Object()->setScript(script); --- 32,37 ---- *************** *** 91,97 **** } #endif - TAU_PROFILE_EXIT("main exitting"); BackEnd::exit(); return 0; } --- 90,95 ---- *** src/Sequencer.C 2008-06-17 19:14:37.478186849 -0500 --- src/Sequencer.C 2006-08-21 17:46:48.000000000 -0500 *************** *** 4,10 **** *** All rights reserved. **/ - #include "TAU.h" #include "InfoStream.h" #include "Node.h" #include "SimParameters.h" --- 4,9 ---- *************** *** 62,68 **** // Invoked by thread void Sequencer::threadRun(Sequencer* arg) { - TAU_REGISTER_THREAD(); arg->algorithm(); } --- 61,66 ---- *************** *** 1406,1412 **** } void Sequencer::terminate() { - TAU_PROFILE_EXIT("Sequencer::terminate"); CthFree(thread); CthSuspend(); } --- 1404,1409 ----