<div>Here is an example:</div><div><br></div><div>{ TObjectList<TItem: TObject> = class(TIndexedList<TItem>) }</div><div><br></div><div>bare.types.pas(1176,1)  procedure/function constructor Create(Boolean);An unhandled exception occurred at $0816975E:</div>
<div><div>bare.types.pas(1182,1)  procedure/function procedure Clone:TObject;</div></div><div><div>Fatal: Compilation aborted</div></div><div><div>Error: ppc386 returned an error exitcode</div></div><div><br></div><div><div>
{ TObjectList<TItem> }</div><div><br></div><div>constructor TObjectList<TItem>.Create(OwnsObjects: Boolean);</div><div>begin // line 1176</div><div>  inherited Create;</div><div>  FOwnsObjects := OwnsObjects;</div>
<div>end;</div><div><br></div><div>function TObjectList<TItem>.Clone: TObject;</div><div>begin</div><div>  Result := TObjectList<TItem>.Create(False);</div><div>  Assign(Result, Self);</div><div>end;  </div></div>