void
CfrTil_Key ( )
{
#if 0
ReadLine_Key ( _Context_->ReadLiner0 ) ;
_DataStack_Push ( _Context_->ReadLiner0->InputKeyedCharacter ) ;
#else
_DataStack_Push ( Key ( ) ) ;
#endif
}
void
ReadLine_GetLine ( ReadLiner * rl )
// we're here until we get a newline char ( '\n' or '\r' ), a eof or a buffer overflow
// note : ReadLinePad [ 0 ] starts after the prompt ( "-: " | "> " ) and doesn't include them
{
ReadLine_RunInit ( rl ) ;
rl->LineStartFileIndex = rl->InputStringIndex ;
while ( ! ReadLiner_IsDone ( rl ) )
{
ReadLine_Key ( rl ) ;
if ( AtCommandLine ( rl ) ) _ReadLine_TabCompletion_Check ( rl ) ;
_CfrTil_->ReadLine_FunctionTable [ _CfrTil_->ReadLine_CharacterTable [ rl->InputKeyedCharacter ] ] ( rl ) ;
ReadLiner_SetState ( rl, ANSI_ESCAPE, false ) ;
SetBuffersUnused ;
}
}
