Source position: pscanner.pp line 911
protected procedure TPascalScanner.HandleBoolDirective(
bs: TBoolSwitch;
const Param: TPasScannerString
); virtual;