anchor.diff:  
         PBufferCurrent := PBufferBase;
         Inc(PBufferBase);
  -    end;
  +    end;   *)
   
       // insert sorted nodes
       // todo
  
positive.code:           Right := ChildNode.Next;
            Left.Next := Right;
            Right.Prev := Left;
          end;
        end;
  
        // add child node to buffer
  
negative.code:   ChildList: PWord;
    Child: NativeUInt;
    Cell: PCPFCell;
    ParentBits: NativeUInt;
    ChildNodeInfo: NativeUInt;
    ChildNode: PCPFNode;
    TileWeights: PCardinalList;
  