Test suite results for test file tbs/tb0031.pp

Test run data :

Test file "tbs/tb0031.pp" information:

t_id 291
t_adddate 2003/10/03
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 937661.

Source:

{ Old file: tbs0035.pp }
{  label at end of block gives error                   OK 0.9.9 (FK) }

{$goto on}

label   hallo;

begin
   writeln('Hello');
  begin
hallo:          {Error message: Incorrect expression.}
  end;
  writeln('Hello again');
end.

Link to SVN view of tbs/tb0031.pp source.