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