Source position: pparser.pp line 460
protected procedure TPasParser.DoParseClassType(
AType: TPasClassType
);