static void InitProgram( void )
{
ExtnSw = 0;
OpenSymTab();
// VAX/VMS version of TrapInit() goes back 2 stack frames to set
// exception bits for the whole compile.
// If the sequence of calls "CompProg()/InitProgram()/TrapInit()"
// changes, TrapInit() will have to be modified.
TrapInit();
ISNNumber = 0;
ITHead = NULL;
InitCSList();
IFInit();
TDProgInit();
BIInit(); // Initialize Browser Info Generator
}
static void InitPurge( void )
{
// Initialize variables for purge routines in case the purge routines
// get called and the corresponding variables don't get initialized.
// Initialize for STPurge();
OpenSymTab();
VSTInit();
// Initialize for ITPurge();
ITHead = NULL;
ITPool = NULL;
// Initialize for CSPurge();
CSHead = NULL;
// Initialize for IOPurge();
CurrFile = NULL;
// Initialize for EnPurge();
Entries = NULL;
// Initialize for EqPurge();
EquivSets = NULL;
}
