Source position: flcInteger.pas line 1849
procedure VarInt32InitInt8(
var A: VarInt32;
const B: ShortInt
);