Test suite results for test file tbs/tb0261.pp

Test run data :

Run ID:
Operating system: linux
Processor: x86_64
Version: 3.3.1
Fails/OK/Total: 11/8504/8515
Version: 3.3.1
Full version: 3.3.1-r20:49046M
Comment: -Fl/usr/lib -Fl/usr/lib64 -Fl/usr/lib/gcc/x86_64-redhat-linux/4.8.2 -Fl/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -Cg -Fd
Machine: gcc121
Category: 1
SVN revisions: 20:49046M:1:49038:1:49048:1:49019
Submitter: pierre
Date: 2021/03/25 03:14:00
Previous run: 568619
Next run: 569121

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
-1736700657568888FalseTrueSkipping test because for other cpu

Record count: 1

No log of 568888.

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.