Source position: pscanner.pp line 877
protected procedure TPascalScanner.SetCurrentBoolSwitches(
const AValue: TBoolSwitches
); virtual;