Test suite results for test file webtbs/tw1090.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/tw1090.pp" information:

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

Detailed test run results:

Record count: 50

Total = 50

OK=5 Percentage= 10.00

Skipped=45 Percentage= 90.00

Result type Cat. Count Percentage First date Last Date
Successfully run 5 10.0 2024/05/08 11:43:00 35 2024/05/08 13:01:00 21
i386 5 100.0 2024/05/08 11:43:00 35 2024/05/08 13:01:00 21
linux 2 40.0 2024/05/08 12:32:00 236 2024/05/08 12:44:00 172
win32 3 60.0 2024/05/08 11:43:00 35 2024/05/08 13:01:00 21
3.3.1 2 40.0 2024/05/08 12:32:00 236 2024/05/08 13:01:00 21
3.2.3 3 60.0 2024/05/08 11:43:00 35 2024/05/08 12:44:00 172
Skipping test because for other cpu 45 90.0 2024/05/08 11:02:00 81 2024/05/08 13:01:00 154
m68k 3 6.7 2024/05/08 11:19:00 244 2024/05/08 12:52:00 58
sparc 4 8.9 2024/05/08 11:36:00 76 2024/05/08 12:18:00 62
powerpc 10 22.2 2024/05/08 11:08:00 44 2024/05/08 12:52:00 243
arm 2 4.4 2024/05/08 12:28:00 33 2024/05/08 12:36:00 210
x86_64 4 8.9 2024/05/08 12:06:00 41 2024/05/08 12:43:00 85
powerpc64 8 17.8 2024/05/08 11:02:00 81 2024/05/08 12:55:00 242
mips 1 2.2 2024/05/08 13:01:00 154 2024/05/08 13:01:00 154
mipsel 1 2.2 2024/05/08 12:48:00 183 2024/05/08 12:48:00 183
aarch64 5 11.1 2024/05/08 11:33:00 39 2024/05/08 12:29:00 32
sparc64 4 8.9 2024/05/08 11:58:00 155 2024/05/08 12:38:00 163
riscv64 3 6.7 2024/05/08 11:52:00 30 2024/05/08 12:10:00 36
linux 44 97.8 2024/05/08 11:08:00 44 2024/05/08 13:01:00 154
aix 1 2.2 2024/05/08 11:02:00 81 2024/05/08 11:02:00 81
3.3.1 28 62.2 2024/05/08 11:19:00 244 2024/05/08 12:55:00 242
3.2.3 17 37.8 2024/05/08 11:02:00 81 2024/05/08 13:01:00 154

Source:

{ %CPU=i386 }
{$asmmode intel}
const
  Number = $7FFFFFF;
  Shift  = 7;
var
  l : longint;
begin
  ASM
        MOV EAX,(Number shr (Shift+3))
        mov l,eax
  End;
  if l<>131071 then
   begin
     writeln('error in constant eval in intel reader');
     halt(1);
   end;
end.

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