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