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