Test suite results for test file tbs/tb0272.pp

Test run data :

Test file "tbs/tb0272.pp" information:

t_id 499
t_adddate 2003/10/03
t_result 217
t_knownrunerror 0
t_opts -Sen -vnw

Detailed test run results:

Record count: 1

No log of 940787.

Source:

{ %OPT=-Sen -vnw }
{ %RESULT=217 }

{ Old file: tbs0318.pp }

{$mode objfpc}
uses sysutils;

{ The exception is used in the raise statement, so no Note should be thrown }
var
  e  : exception;
begin
  e:=exception.create('test');
  raise e;
end.

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