void
_CfrTil_Run ( CfrTil * cfrTil, int32 restartCondition )
{
while ( 1 )
{
OVT_MemListFree_Session ( ) ;
cfrTil = _CfrTil_New ( cfrTil ) ;
if ( cfrTil )
{
if ( ! sigsetjmp ( cfrTil->JmpBuf0, 0 ) )
{
System_RunInit ( _Context_->System0 ) ;
_CfrTil_ReStart ( cfrTil, restartCondition ) ;
// check if reset is ok ...
if ( cfrTil && _Context_ && _Context_->System0 )
{
DebugOff ;
CfrTil_C_Syntax_Off ( ) ;
Ovt_RunInit ( _Q_ ) ;
//if ( _Q_->Verbosity > 1 )
{
if ( _Q_->Verbosity ) System_Time ( cfrTil->Context0->System0, 0, ( char* ) "Startup", 1 ) ; //_Q_->StartedTimes == 1 ) ;
if ( _Q_->Verbosity ) _CfrTil_Version ( 0 ) ;
}
CfrTil_InterpreterRun ( ) ;
}
}
}
}
}
void
CfrTil_Time ( )
{
int32 timer = DataStack_Pop ( ) ;
System_Time ( _Context_->System0, timer, ( char* ) "Timer", 1 ) ;
}