Source position: pscanner.pp line 940
protected procedure TPascalScanner.HandleMode(
const Param: TPasScannerString
); virtual;