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