Wrongly handled class var dyn. array
Original Reporter info from Mantis: hnb
-
Reporter name: Maciej Izak
Original Reporter info from Mantis: hnb
- Reporter name: Maciej Izak
Description:
Dyn. array is released before class destructor:
======
type
TFoo = class
class var
F: array of TObject;
class constructor Create;
class destructor Destroy;
end;
class constructor TFoo.Create;
begin
SetLength(F, 10);
end;
class destructor TFoo.Destroy;
begin
WriteLn(Length(F)); // expected 10, current value is 0
ReadLn;
end;
begin
WriteLn(Length(TFoo.F));
end.
Mantis conversion info:
- Mantis ID: 29245
- Version: 3.1.1
- Fixed in version: 3.1.1
- Fixed in revision: 38716 (#cb7730a4)
- Monitored by: » SDN (SDN)