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