Test suite results for test file webtbs/tw0735.pp

Test run data :

Run ID:
Operating system: solaris
Processor: sparc
Version: 3.3.1
Fails/OK/Total: 57/9104/9161
Version: 3.3.1
Full version: 3.3.1-15627-g64f2e4b-unpushed
Comment: -Cg -Fd
Machine: unstable10s
Category: 1
SVN revisions: e601156:d3fd0b8:64f2e4b:6a10963
Submitter: pierre
Date: 2024/04/28 13:29:00
Previous run: 940467
Next run: 941969

Hide skipped tests

Hide successful tests

Test file "webtbs/tw0735.pp" information:

t_id 678
t_cpu i386
t_adddate 2003/10/03
t_result 0
t_knownrunerror 0

Detailed test run results:

tr_idruntr_oktr_skiptr_result
482485635941232FalseTrueSkipping test because for other cpu

Record count: 1

No log of 941232.

Source:

{ %CPU=i386 }
{$asmmode intel}
{$inline on}

procedure DoIt;
begin
  Writeln('DoIt was called');
end;

const
  CB : word = 5;

procedure A(B: word); assembler; inline;
asm
   MOV  AX,B
   CMP  AX,[CB]
   JZ   @OK
   MOV  [CB],AX
   CALL DoIt
@OK:      { <-- creates labels with same name }
end;

begin
   A(5);
   A(8);
end.

Link to SVN view of webtbs/tw0735.pp source.