do
{
  start = read_seqbegin (&sl);
  ...
}
while (read_seqretry (&sl, start);