{ Wrong line number for error message }
begin
  repeat
   writeln('test');
  until sptr;
end.