Test suite results for test file webtbs/tw2706.pp

Test run data :

Test file "webtbs/tw2706.pp" information:

t_id 1000
t_adddate 2003/10/06
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 1015786.

Source:

{ Source provided for Free Pascal Bug Report 2706 }
{ Submitted by "Johannes Berg" on  2003-10-01 }
{ e-mail: johannes -at- sipsolutions -dot- de }
program j;

{$mode delphi}

uses
  uw2706b, uw2706a;

type
  TClassB = class(TClassA)
  end;
  TClassC = class
    FB: TClassB;
    procedure Test;
  end;

procedure TClassC.Test;
var
  LX: TX;
begin
  FB.CT(LX);
end;

begin
end.

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