anchor.diff:          let node = this.CreateNode(name)
           node.InnerText <- text
           node
  -
  -    member this.DeleteEmptyReferences() = 
  -        this.DeleteIfEmpty("//ns:ItemGroup")
  -        this.DeleteIfEmpty("//ns:When")
  -        this.DeleteIfEmpty("//ns:Otherwise")
  -        this.DeleteIfEmpty("//ns:Choose")
  -        this.DeleteIfEmpty("//ns:When")
  -        this.DeleteIfEmpty("//ns:Choose")
   
       member this.createFileItemNode fileItem =
           this.CreateNode(fileItem.BuildAction)
  
positive.code: 
      member this.FindPaketNodes(name) = 
          [
              for node in this.Document.SelectNodes(sprintf "//ns:%s" name, this.Namespaces) do
                  let isPaketNode = ref false
                  for child in node.ChildNodes do
                          if child.Name = "Paket" then isPaketNode := true
  
negative.code:             if generalReferencesFile.Exists then Some generalReferencesFile.FullName
              else None
  
      member this.DeleteIfEmpty name =
          let nodesToDelete = List<_>()
          for node in this.Document |> getDescendants name do
              if node.ChildNodes.Count = 0 then
                  nodesToDelete.Add node
  
  