18 const int INPUT_LINE_LENGTH_EMPTY=75;
20 for(
long i=0; i<INPUT_LINE_LENGTH_EMPTY-1; ++i)
24 chTitle[INPUT_LINE_LENGTH_EMPTY-1] =
'\0';
42 if( chLine[0] ==
'#' || chLine[0] ==
'*' || chLine[0] ==
'%' || chLine[0] ==
' ' )
46 else if( strncmp(chLine,
"//", 2 ) == 0 )
51 else if( chLine[0] ==
'C' || chLine[0] ==
'c' )
57 if( chLine[1] ==
'\n' || chLine[1] ==
' ' || chLine[1] ==
'\r' )
116 strcpy( chCAPS , chCard );
119 if( !
nMatch(
"HIDE" , chCAPS ) )
120 fprintf( ipOUT,
"%s\n", chCard );
195 fprintf(
ioQQQ,
"t_input::readarray returns=%s=\n",chCard );
212 getline( ioDATA,line );
215 fprintf(
ioQQQ,
" PROBLEM Empty line found reading file %s.\n Sorry.\n\n", chFile );
219 istringstream iss( line );
223 iss >> skipws >> tmpValue;
225 vec.push_back(tmpValue);
229 *lgError = iss.bad() || ioDATA.bad();
244 for(
long i=0; i < n; ++i )
247 *lgEOF = !ioDATA.good();
FILE * open_data(const char *fname, const char *mode, access_scheme scheme)
NORETURN void TotalInsanity(void)
long nMatch(const char *chKey, const char *chCard)
const ios_base::openmode mode_r
const int INPUT_LINE_LENGTH
#define DEBUG_ENTRY(funcname)
int fprintf(const Output &stream, const char *format,...)