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();
}
