Source position: pscanner.pp line 885
protected procedure TPascalScanner.DoHandleComment(
Sender: TObject;
const aComment: TPasScannerString
); virtual;