void ORLSkipObj( file_list *list, unsigned long *loc ) /****************************************************/ // skip the object file. // NYI: add an entry point in ORL for a more efficient way of doing this. { orl_file_handle filehdl; ORLFileSeek( list, *loc, SEEK_SET ); filehdl = InitFile(); // assumes that entire file is read! *loc = ORLFileSeek( list, 0, SEEK_CUR ); FiniFile( filehdl, list ); }
void PrevFile( void ) /*******************/ { int nexts; if( NextFileCalls ) { RestoreLine(); nexts = NextFileCalls - 1; FiniFile(); while( NextFileCalls != nexts ) { NextFile(); } Draw = TRUE; } }