Test suite results for test file tbs/tb0445.pp

Test run data :

Test file "tbs/tb0445.pp" information:

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

Detailed test run results:

Record count: 1

No log of 1027341.

Source:

type
  tproc = procedure(self,l2:longint);

procedure p(l1,l2:longint);
begin
end;

var
  pv : tproc;
begin
  pv:={$ifdef fpc}@{$endif}p;
end.

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