nested class vars cause crash
Original Reporter info from Mantis: Giel
-
Reporter name:
Original Reporter info from Mantis: Giel
- Reporter name:
Description:
An exception error occurs when a nested class var is accessed.
Steps to reproduce:
Run this program (I used Win32):
program project1;
{$mode delphi}{$H+}
type
TFoo1 = class
type
TFoo2 = class
class var
x: integer;
constructor Create;
end;
end;
constructor TFoo1.TFoo2.Create;
begin
inherited;
inc(x); //exception class 'External: SIGSEGV'
end;
begin
TFoo1.TFoo2.Create;
end.
Mantis conversion info:
- Mantis ID: 18131
- Fixed in version: 2.6.0
- Fixed in revision: 16494 (#8b209be7)