Compilation stop with exception
Original Reporter info from Mantis: kazalex
-
Reporter name: Kazantsev Alexey
Original Reporter info from Mantis: kazalex
- Reporter name: Kazantsev Alexey
Description:
Compiler error when trying access to class property of nested type:
fpc_nestedtype_ice.lpr(25,27) Error: Compilation raised exception internally
Steps to reproduce:
program fpc_nestedtype_ice;
{$mode delphiunicode}
Type
TRec = Record
Type
NestedType = Record
Class Var
FVar : Integer;
Class Property Variable : Integer Read FVar Write FVar;
End;
End;
Begin
TRec.NestedType.Variable := 1;
End.
Mantis conversion info:
- Mantis ID: 29030
- Build: 32354
- Version: 3.1.1
- Fixed in version: 3.1.1
- Fixed in revision: 32517 (#9ea38f45)
- Monitored by: » kazalex (Kazantsev Alexey)
- Target version: 3.0.2