t_id
1225
t_version
1.1
t_adddate
2004/01/07
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
525457080 | 948186 | False | True | Skipping test run because it is a unit |
Record count: 1
{ %version=1.1 } {$mode objfpc} { Source provided for Free Pascal Bug Report 2865 } { Submitted by "Eric Grange" on 2003-12-30 } { e-mail: egrange@glscene.org } unit tw2865; interface uses Classes; type TVector = array [0..3] of Single; TGLUpdateAbleObject = class (TPersistent) end; TGLCoordinates = class (TGLUpdateAbleObject) private { Private Declarations } FCoords : TVector; published { Published Declarations } property X : Single index 0 read FCoords[0]; end; implementation end.