nested classes: local procedures can't see type
Original Reporter info from Mantis: Giel
-
Reporter name:
Original Reporter info from Mantis: Giel
- Reporter name:
Description:
This unit won't compile:
unit unit1;
interface
type
TFoo2 = class
type
TType1 = integer;
TFoo4 = class
procedure Proc4;
end;
end;
implementation
procedure TFoo2.TFoo4.Proc4;
function Func1: TType1; //Error: Identifier not found "TType1"
begin
end;
begin
end;
end.
Mantis conversion info:
- Mantis ID: 18124
- Fixed in version: 2.6.0
- Fixed in revision: 16491 (#2155dadf)