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