t_id
1345
t_adddate
2004/08/28
t_result
0
Flag
t_norun
set
t_knownrunerror
0
Record count: 50
Total = 50
OK=0 Percentage= 0.00
Skipped=50 Percentage= 100.00
| Result type | Cat. | Count | Percentage | First date | Last Date |
| Skipping test because for other target | 49 | 98.0 | 2024/05/17 23:52:00 41 | 2024/05/18 01:31:00 0 | |
| i386 | 35 | 71.4 | 2024/05/18 00:20:00 23 | 2024/05/18 01:31:00 0 | |
| sparc | 1 | 2.0 | 2024/05/17 23:52:00 41 | 2024/05/17 23:52:00 41 | |
| x86_64 | 9 | 18.4 | 2024/05/18 00:16:00 29 | 2024/05/18 01:29:00 14 | |
| powerpc64 | 2 | 4.1 | 2024/05/18 01:09:00 101 | 2024/05/18 01:11:00 108 | |
| aarch64 | 2 | 4.1 | 2024/05/18 00:11:00 33 | 2024/05/18 00:52:00 35 | |
| linux | 41 | 83.7 | 2024/05/18 00:11:00 33 | 2024/05/18 01:31:00 0 | |
| solaris | 8 | 16.3 | 2024/05/17 23:52:00 41 | 2024/05/18 00:34:00 30 | |
| 3.3.1 | 18 | 36.7 | 2024/05/18 00:11:00 33 | 2024/05/18 01:29:00 14 | |
| 3.2.3 | 31 | 63.3 | 2024/05/17 23:52:00 41 | 2024/05/18 01:31:00 0 | |
| Skipping run test | 1 | 2.0 | 2024/05/18 00:21:00 24 | 2024/05/18 00:21:00 24 | |
| i386 | 1 | 100.0 | 2024/05/18 00:21:00 24 | 2024/05/18 00:21:00 24 | |
| win32 | 1 | 100.0 | 2024/05/18 00:21:00 24 | 2024/05/18 00:21:00 24 | |
| 3.3.1 | 1 | 100.0 | 2024/05/18 00:21:00 24 | 2024/05/18 00:21:00 24 |
{ %norun }
{ %target=win32 }
{ Source provided for Free Pascal Bug Report 3261 }
{ Submitted by "Andreas Hausladen" on 2004-08-18 }
{ e-mail: Andreas.Hausladen@gmx.de }
program test;
{$mode delphi}
type
TTest = class(TObject)
public
procedure myfunc(arg1: Integer; arg2: TTest); overload;
procedure myfunc(arg1: TTest); overload;
end;
procedure TTest.myfunc(arg1: Integer; arg2: TTest); external 'test.dll' name 'TTest_myfunc';
procedure TTest.myfunc(arg1: TTest);
begin
if arg1 = nil then ;
end;
begin
end.