anchor.diff:  
       // PARENT_BITS
       LookupLine;
  -    LookupLine('PARENT_BITS: array[0..63{oddy:1;hexagonal:1;simple:1;child:3}] of NativeUInt = (');
  +    LookupLine('PARENT_BITS: array[0..31{oddy:1;hexagonal:1;child:3}] of NativeUInt = (');
       for Child := 0 to 7 do
       begin
         AddParentBits(Child, Child = 7);
  
positive.code:     end;
    end;
  
    S := Format('  $%0.8x, $%0.8x, $%0.8x, $%0.8x, $%0.8x, $%0.8x, $%0.8x, $%0.8x',
      [Buffer[0], Buffer[1], Buffer[2], Buffer[3],
       Buffer[4], Buffer[5], Buffer[6], Buffer[7]]);
  
    if (not Finalize) then S := S + ',';
    LookupLine(S);
  
negative.code:       Inc(NativeInt(Cell), CellOffsets[Child]);
  
        // parent bits
        Child := Child shl 2;
        Child := Child + (NodeFlags and 2) + (NativeUInt(Cardinal(Store.Current.Coordinates)) and 1);
        ParentBits := PARENT_BITS[Child];
  
        // allocated new or use exists
  