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