Source position: flcInteger.pas line 823
procedure Word128SetBit(
var A: Word128;
const B: Integer
);