Test suite results for test file webtbs/tw0735.pp

Test run data :

Free Pascal Compiler Test Suite Results

View Test suite results

Please specify search criteria:
File:
Operating system:
Processor:
Version
Date
Submitter
Machine
Comment
Limit
Cond
Category
Only failed tests
Hide skipped tests
List all 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:

Record count: 50

Total = 50

OK=10 Percentage= 20.00

Skipped=40 Percentage= 80.00

Result type Cat. Count Percentage First date Last Date
Successfully run 10 20.0 2024/05/08 20:34:00 44 2024/05/08 23:53:00 34
i386 10 100.0 2024/05/08 20:34:00 44 2024/05/08 23:53:00 34
linux 10 100.0 2024/05/08 20:34:00 44 2024/05/08 23:53:00 34
3.3.1 2 20.0 2024/05/08 23:35:00 28 2024/05/08 23:48:00 27
3.2.3 8 80.0 2024/05/08 20:34:00 44 2024/05/08 23:53:00 34
Skipping test because for other cpu 40 80.0 2024/05/08 20:16:00 46 2024/05/08 23:52:00 41
m68k 1 2.5 2024/05/08 20:43:00 63 2024/05/08 20:43:00 63
sparc 19 47.5 2024/05/08 20:42:00 81 2024/05/08 23:52:00 41
powerpc 2 5.0 2024/05/08 20:18:00 184 2024/05/08 21:11:00 188
arm 1 2.5 2024/05/08 20:25:00 69 2024/05/08 20:25:00 69
x86_64 7 17.5 2024/05/08 20:39:00 24 2024/05/08 23:14:00 21
powerpc64 4 10.0 2024/05/08 20:25:00 212 2024/05/08 21:28:00 73
mips 1 2.5 2024/05/08 20:52:00 160 2024/05/08 20:52:00 160
mipsel 1 2.5 2024/05/08 21:02:00 151 2024/05/08 21:02:00 151
aarch64 1 2.5 2024/05/08 20:16:00 46 2024/05/08 20:16:00 46
sparc64 3 7.5 2024/05/08 20:18:00 148 2024/05/08 22:05:00 151
linux 18 45.0 2024/05/08 20:16:00 46 2024/05/08 22:13:00 104
solaris 17 42.5 2024/05/08 23:24:00 38 2024/05/08 23:52:00 41
win64 5 12.5 2024/05/08 20:39:00 24 2024/05/08 23:14:00 21
3.3.1 10 25.0 2024/05/08 23:14:00 21 2024/05/08 23:46:00 48
3.2.3 30 75.0 2024/05/08 20:16:00 46 2024/05/08 23:52:00 41

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.