t_id
952
t_version
1.1
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
950839895 | 1015804 | False | True | Skipping test run because it is a unit |
Record count: 1
{ %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.