campo-sirio/at/atnext.cpp
cris e1594fd672 Cris nevert commit . Shame on her
git-svn-id: svn://10.65.10.50/trunk@4223 c028cbd2-c16b-5b4b-a496-9718f37d4682
1997-03-20 10:33:28 +00:00

27 lines
579 B
C++
Executable File

int TFile_text::next()
{
CHECK(_current, "NULL current record");
if (_current->length() > 0)
fstream::read((char*)_current, _current->length());
else
TString record = "";
bool trovato = FALSE;
while (!trovato && good() && !eof()) do
{
char readchar = get();
const char* separator = separator();
if (readchar = separator[0])
{
int actchar = 1
while (actchar < separator.len() && readchar = separator[actchar-1]) do
{
actchar++;
}
}
else
record << readchar;
}
// manca la lettura per file con separatore
return 0;
}