anchor.diff:      Exit;
     end;
   
  -  NewSize := FindSize(PLimb(Data), Size and SizeMask);
  +  NewSize := ActualSize(PLimb(Data), Size and SizeMask);
     if NewSize < (Size and SizeMask) then
     begin
       if NewSize = 0 then
  
positive.code:   // Set this to True if you want to generate debug output.
    DoDebug: Boolean = True;
  
  {$HPPEMIT END '#include "Velthuis.BigIntegers.operators.hpp"'}
  
  implementation
  
  
negative.code: {$IFDEF PUREPASCAL}
  var
    I: Integer;
    L: PLimb;
  begin
    // Ensure Left/LSize belong to largest BigInteger.
    if LSize < RSize then
    begin
      SwapIntegers(LSize, RSize);
      SwapPLimbs(Left, Right);
    end;
    for I := 0 to RSize - 1 do
      Result[I] := Left[I] or Right[I];
  