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