Test suite results for test file tbs/tb0261.pp

Test run data :

Run ID:
Operating system: linux
Processor: powerpc64
Version: 3.2.3
Fails/OK/Total: 103/7866/7969
Version: 3.2.3
Full version: 3.2.3-1374-g849fbd722c-unpushed
Comment: -gwlttt -CriotR -O4 -Fl/usr/lib/gcc/powerpc64-linux-gnu/13 -Fd
Machine: gcc203
Category: 1
SVN revisions: fdf93c5b29:849fbd722c:ae0fe8a6a0:d1c29e6cb9
Submitter: pierre
Date: 2024/04/19 10:33:00 <> 2024/04/10
Previous run: 933756
Next run: 936174

Hide skipped tests

Hide successful tests

Test file "tbs/tb0261.pp" information:

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

Detailed test run results:

tr_idruntr_oktr_skiptr_result
443576017934951FalseTrueSkipping test because for other cpu

Record count: 1

No log of 934951.

Source:

{ Old file: tbs0304.pp }
{ Label redefined when inlining assembler              OK 0.99.13 (PFV) }

{$asmmode intel}
{$inline on}

var
  cb : word;

procedure A(B: word); assembler; inline;
{$ifdef CPUI386}
asm
   MOV  AX,B
   CMP  AX,[CB]
   JZ   @@10
   MOV  [CB],AX
@@10:
end;
{$endif CPUI386}
{$ifdef CPU68K}
asm
   move.w  b,d0
   cmp.w   cb,d0
   beq     @L10
   move.w  d0,cb
@L10:
end;
{$endif CPU68K}

begin
  a(1);
  a(2);
end.

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