extern void WPInit( void ) /************************/ { char *rover; bint do_report; char buff[256]; #ifdef TRMEM TRMemOpen(); TRMemRedirect( STDOUT_FILENO ); #endif SamplePath[0] = 0; InitPaths(); rover = getenv( "WPROF" ); if( rover != NULL ) { procCmd( rover ); } getcmd( buff ); do_report = procCmd( buff ); WndInit( "Open Watcom Profiler" ); WPWndInitDone = P_TRUE; InitMADInfo(); WPDipInit(); if( do_report ) { if( GetSampleInfo() ) { ReportSampleInfo(); } exit( 0 ); } }
void DebugInit( void ) { NestedCallLevel = 0; UpdateFlags = 0; _SwitchOn( SW_ERROR_STARTUP ); _SwitchOn( SW_CHECK_SOURCE_EXISTS ); SET_NIL_ADDR( NilAddr ); TxtBuff = &DbgBuffers[0]; *TxtBuff = '\0'; NameBuff = &DbgBuffers[TXT_LEN+1]; *NameBuff = '\0'; CurrRadix = DefRadix = 10; DbgLevel = MIX; ActiveWindowLevel = MIX; _SwitchOn( SW_BELL ); _SwitchOn( SW_FLIP ); _SwitchOn( SW_RECURSE_CHECK ); _SwitchOff( SW_ADDING_SYMFILE ); _SwitchOff( SW_TASK_RUNNING ); RecordInit(); LogInit(); InitMADInfo(); InitMachState(); PathInit(); InitDbgInfo(); InitTrap( TrapParms ); if( !LangSetInit() ) { FiniTrap(); StartupErr( LIT_ENG( STARTUP_Loading_PRS ) ); } if( !InitCmd() ) { FiniTrap(); StartupErr( LIT_ENG( ERR_NO_MEMORY ) ); } InitScan(); InitLook(); InitBPs(); InitSource(); InitDLLList(); DUIInit(); InitHook(); VarDisplayInit(); }