anchor.diff:  
       // PARENT_BITS
       LookupLine;
  -    LookupLine('PARENT_BITS: array[0..31{oddy:1;hexagonal:1;child:3}] of NativeUInt = (');
  +    LookupLine('PARENT_BITS: array[0..63{oddy:1;hexagonal:1;simple:1;child:3}] of NativeUInt = (');
       for Child := 0 to 7 do
       begin
         AddParentBits(Child, Child = 7);
  
positive.code:   Store: record
      Buffer: TMapNodeBuffer;
      Self: Pointer;
      HexagonalFlag: NativeUInt;
      Info: TCPFInfo;
  
      {$ifdef CPUX86}
  
negative.code: procedure AddParentBits(Child: Integer; Finalize: Boolean);
  var
    Parent: Integer;
    Buffer: array[0..7] of Cardinal;
    Simple, Hexagonal, OddY: Boolean;
    Item: PCardinal;
    S: string;
  
  