anchor.diff:      System.GetMemoryManager(MemoryManager);
     {$endif}
     {$if Defined(DEBUG) and not Defined(CPFLIB)}
  -    TTileMap(nil).SetTile(0, 0, 1);
  +    //DoTileMapUpdate(TTileMapUpdateInfo(nil^));
  +    TTileMap(nil).Update(nil, 0, 0, 0, 0, 0);
   
       TTileMap(nil).UpdateCellMasks(Rect(0, 0, 0, 0));
   
  
positive.code:   _X, _Y: Word;
    _Self: Pointer;
    CellInfo: NativeUInt;
  begin
    if (X >= Width) or (Y >= Height)  then
    begin
  
negative.code:     CellInfo := Cell.NodePtr;
      if (CellInfo and NODEPTR_FLAG_ALLOCATED <> 0) then
      begin
        {$ifdef LARGEINT}
        NodeBuffers := Pointer(@FInfo.NodeAllocator.Buffers);
        {$endif}
        Node := PCPFNode(
                  {$ifdef LARGEINT}NodeBuffers[CellInfo shr LARGE_NODEPTR_OFFSET] +{$endif}
                  CellInfo and NODEPTR_CLEAN_MASK
                   );
        CellInfo := Node.NodeInfo shr 24;
  