anchor.diff:  class operator BigInteger.LeftShift(const Value: BigInteger; Shift: Integer): BigInteger;
   var
     LimbShift: Integer;
  -  LSign: TLimb;
  +  LSign: Integer;
   begin
     if Value.FData = nil then
       Exit(Zero);
  
positive.code: procedure BigInteger.MakeSize(RequiredSize: Integer);
  begin
    FData := nil;
    AllocNewMagnitude(Pointer(FData), RequiredSize);
    FSize := RequiredSize;
  end;
  
  
negative.code:   LSign := Left.FSize and SignMask;
    RSign := Right.FSize and SignMask;
    ResSize := IntMax(LSize, RSize) + 1;
    AllocNewMagnitude(ResData, ResSize);
  
    if LSign = RSign then
    begin
  