anchor.diff:    Res: BigInteger;
     LSize, RSize: Integer;
     SignBit: Integer;
  -  Comparison: TValueSign;
  +  Comparison: Integer;
   begin
     if Pointer(Left.FData) = nil then
     begin
  
positive.code:     class operator Multiply(Left: Word; const Right: BigInteger): BigInteger; inline;
  
      /// <summary>Performs an integer divide of the first BigInteger by the second.
      class operator IntDivide(const Left, Right: BigInteger): BigInteger;
  
      /// <summary>Performs an integer divide of the first BigInteger by the second.
      class operator IntDivide(const Left: BigInteger; Right: UInt16): BigInteger;
  
      /// <summary>Performs an integer divide of the first BigInteger by the second.
      class operator IntDivide(const Left: BigInteger; Right: UInt32): BigInteger;
  
      /// <summary>Returns the remainder of an integer divide of the first BigInteger by the second.</summary>
      class operator Modulus(const Left, Right: BigInteger): BigInteger;
  
      /// <summary>Returns the remainder of an integer divide of the first BigInteger by the second.</summary>
      class operator Modulus(const Left: BigInteger; Right: UInt32): BigInteger;
  
      /// <summary>Returns the remainder of an integer divide of the first BigInteger by the second.</summary>
      class operator Modulus(const Left: BigInteger; Right: UInt16): BigInteger;
  
      /// <summary>Unary minus. Negates the value of the specified BigInteger.</summary>
      class operator Negative(const Value: BigInteger): BigInteger;
  
  {$IFDEF BIGINTEGERIMMUTABLE}
    private
  
negative.code:   end;
  end;
  
  class function BigInteger.InternalCompare(Left, Right: PLimb; LSize, RSize: Integer): Integer;
  {$IFDEF PUREPASCAL}
  var
    L, R: PLimb;
  