Test suite results for test file webtbs/tw3863.pp

Test run data :

Run ID:
Operating system: aix
Processor: powerpc64
Version: 3.2.3
Fails/OK/Total: 81/7829/7910
Version: 3.2.3
Full version: 3.2.3-1376-gbff5cbd342
Comment: -Fl/opt/freeware/lib -Fd
Machine: power-aix
Category: 1
SVN revisions: bff5cbd342:c17a0e20f5:4f3b6199df:d1c29e6cb9
Submitter: pierre
Date: 2024/05/08 11:02:00 <> 2024/05/04
Previous run: 947415
Next run: 948764

Hide skipped tests

Hide successful tests

Test file "webtbs/tw3863.pp" information:

t_id 1545
t_cpu i386
t_adddate 2005/04/05
t_result 0
t_knownrunerror 0

Detailed test run results:

tr_idruntr_oktr_skiptr_result
525200146948144FalseTrueSkipping test because for other cpu

Record count: 1

No log of 948144.

Source:

{ %cpu=i386 }

{ Source provided for Free Pascal Bug Report 3863 }
{ Submitted by "Jernej" on  2005-04-01 }
{ e-mail: jernejcoder@gmail.com }

{$mode delphi}

function FormatBuf(var Buffer; BufLen: Cardinal; const Format;
 FmtLen: Cardinal; const Args: array of const): Cardinal;
asm
CMP     EAX,Args.Integer[-4] // -> "error building record offset"
CMP     [EBX+EAX*8].Byte[4],vtInteger // -> error: assembler error in operand
CMP     EBX,Args.Integer[-4] // -> "error building record offset"
MOVZX   EBX,[ESI].Byte[4] // -> error: assembler error in operand
JMP     @CvtVector.Pointer[EBX*4] // "error: assembler syntax error"
@CvtVector:
        DD      0
        DD      0
        DD      0
        DD      0
end;

begin
end.

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