t_id
952
t_version
1.1
t_adddate
2003/10/03
t_result
0
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 run because it is a unit | 50 | 100.0 | 2024/05/17 23:33:00 28 | 2024/05/18 01:09:00 101 | |
| i386 | 21 | 42.0 | 2024/05/17 23:33:00 28 | 2024/05/18 01:09:00 28 | |
| sparc | 14 | 28.0 | 2024/05/17 23:34:00 46 | 2024/05/17 23:55:00 41 | |
| x86_64 | 12 | 24.0 | 2024/05/18 00:05:00 29 | 2024/05/18 00:34:00 30 | |
| powerpc64 | 1 | 2.0 | 2024/05/18 01:09:00 101 | 2024/05/18 01:09:00 101 | |
| aarch64 | 2 | 4.0 | 2024/05/18 00:11:00 33 | 2024/05/18 00:52:00 35 | |
| linux | 17 | 34.0 | 2024/05/17 23:33:00 28 | 2024/05/18 01:09:00 101 | |
| win32 | 3 | 6.0 | 2024/05/17 23:41:00 23 | 2024/05/18 00:21:00 24 | |
| solaris | 30 | 60.0 | 2024/05/17 23:34:00 46 | 2024/05/18 00:34:00 30 | |
| 3.3.1 | 20 | 40.0 | 2024/05/17 23:33:00 28 | 2024/05/18 01:09:00 101 | |
| 3.2.3 | 30 | 60.0 | 2024/05/17 23:35:00 37 | 2024/05/18 01:02:00 26 |
{ %version=1.1 }
{ Source provided for Free Pascal Bug Report 2409 }
{ Submitted by "Mattias Gaertner" on 2003-03-07 }
{ e-mail: nc-gaertnma@netcologne.de }
unit tw2409;
{$mode objfpc}{$H+}
interface
type
HDC = type integer;
TMyClass = class
procedure DoSomething(H: HDC);
end;
implementation
{ TMyClass }
procedure TMyClass.DoSomething(H: HDC);
begin
end;
end.