Test suite results for test file tbs/tb0142.pp

Test run data :

Test file "tbs/tb0142.pp" information:

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

Detailed test run results:

Record count: 1

No log of 497919.

Source:

{ Old file: tbs0170.pp }
{ Asm, {$ifdef} is seen as a separator                  OK 0.99.9 (PFV) }

procedure free1;
begin
end;

procedure free2;
begin
end;

begin
asm
{$ifdef CPUI386}
        call {$ifdef dummy}free1{$else}free2{$endif}
{$endif CPUI386}
{$ifdef CPU68K}
        jsr {$ifdef dummy}free1{$else}free2{$endif}
{$endif CPU68K}
end;
end.

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