Test suite results for test file tbs/tb0142.pp

Test run data :

Run ID:
Operating system: solaris
Processor: sparc
Version: 3.3.1
Fails/OK/Total: 61/9095/9156
Version: 3.3.1
Full version: 3.3.1-15620-gb18c93d-unpushed
Comment: -Xn -Cg -Fd
Machine: unstable10s
Category: 1
SVN revisions: 1de3aba:0481a46:b18c93d:61397d4
Submitter: pierre
Date: 2024/04/27 12:36:00
Previous run: 928775
Next run: 941207

Hide skipped tests

Hide successful tests

Test file "tbs/tb0142.pp" information:

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

Detailed test run results:

tr_idruntr_oktr_skiptr_result
477669269940456TrueFalseSuccessfully run

Record count: 1

No log of 940456.

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.