t_id
996
t_adddate
2003/10/06
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
480885569 | 940962 | True | False | Successfully run |
Record count: 1
{ Source provided for Free Pascal Bug Report 2702 } { Submitted by "Johannes Berg" on 2003-10-01 } { e-mail: johannes -at- sipsolutions -dot- de } {$mode delphi} uses Classes; type TDummy = class(TObject) end; TF = class(TObject) function GetDummy: TDummy; virtual; abstract; property dummy: TDummy read GetDummy; procedure dada; end; procedure TF.dada; begin if Assigned(dummy) then begin end; end; begin end.