Test suite results for test file webtbs/tw2728.pp

Test run data :

Test file "webtbs/tw2728.pp" information:

t_id 1016
t_adddate 2003/10/10
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 940749.

Source:

{ Source provided for Free Pascal Bug Report 2728 }
{ Submitted by "marco (the gory bugs department)" on  2003-10-09 }
{ e-mail:  }
{$mode delphi}
type baseclass = class end;
     tbaseclass= class of baseclass;

function test (c : tbaseclass):longint;

var o :tobject;

begin
  o:=tobject(c);   // illegal type conversion here
end;

begin
end.

Link to SVN view of webtbs/tw2728.pp source.