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

t_id 1156
t_cpu i386
t_adddate 2003/10/22
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 50

Total = 50

OK=32 Percentage= 64.00

Skipped=18 Percentage= 36.00

Result type Cat. Count Percentage First date Last Date
Successfully run 32 64.0 2024/05/08 01:00:00 35 2024/05/08 01:56:00 34
i386 32 100.0 2024/05/08 01:00:00 35 2024/05/08 01:56:00 34
linux 31 96.9 2024/05/08 01:00:00 35 2024/05/08 01:56:00 34
go32v2 1 3.1 2024/05/08 01:48:00 54 2024/05/08 01:48:00 54
3.3.1 23 71.9 2024/05/08 01:24:00 43 2024/05/08 01:55:00 22
3.2.3 9 28.1 2024/05/08 01:00:00 35 2024/05/08 01:56:00 34
Skipping test because for other cpu 18 36.0 2024/05/08 01:26:00 33 2024/05/08 01:52:00 36
sparc 1 5.6 2024/05/08 01:34:00 61 2024/05/08 01:34:00 61
x86_64 9 50.0 2024/05/08 01:27:00 24 2024/05/08 01:52:00 36
powerpc64 3 16.7 2024/05/08 01:31:00 46 2024/05/08 01:46:00 67
aarch64 5 27.8 2024/05/08 01:26:00 33 2024/05/08 01:46:00 38
linux 17 94.4 2024/05/08 01:26:00 33 2024/05/08 01:52:00 36
solaris 1 5.6 2024/05/08 01:34:00 61 2024/05/08 01:34:00 61
3.3.1 18 100.0 2024/05/08 01:26:00 33 2024/05/08 01:52:00 36

Source:

{ %cpu=i386 }

{ Source provided for Free Pascal Bug Report 2666 }
{ Submitted by "marcov" on  2003-09-06 }
{ e-mail: marco@freepascal.org }

{$mode delphi}

function GetDynamicMethod(AClass: TClass; Index: Integer): Pointer; assembler;
asm
        CALL    System.@Halt
end;

begin
  GetDynamicMethod(nil,0);
end.

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