anchor.diff:            CellInfo := CellInfo + Format(', parent: %d', [Node.ParentAndFlags and 7]);
           end else
           begin
  -          if (N = @FNodes.ExcludedPool.First) then CellKind := CellKind + ' [excluded]'
  -          else
             if (N = @FNodes.HeuristedPool.First) then CellKind := CellKind + ' [heuristed]'
             else
             if (N = @FNodes.UnattainablePool.First) then CellKind := CellKind + ' [unattainable]'
  
positive.code: {$ifdef CPFDBG}
  function TTileMap.CellInformation(const X, Y: Word): string;
  const
    STAR: array[Boolean] of string = ('', '*');
  var
    Cell: PCPFCell;
  
negative.code: 
      // call find path loop
      StartPoint.KnownPathNode := DoFindPathLoop(Node);
      if (not FNodes.HotPool.Unattainable) then
      begin
      path_found:
        if (Store.AttainableAlgorithm) then
        begin
  