anchor.diff:  
       let exclusions =
           optional.FilesExcluded
  -        |> List.map (fun e -> Path.Combine(workingDir,e) |> fixRelativePath)
  -        |> List.map Fake.Globbing.isMatch
  +        |> List.map (fun e -> Path.Combine(workingDir,e) |> fixRelativePath |> Fake.Globbing.isMatch)
   
       let isExcluded p =
           let path = DirectoryInfo(p).FullName
  
positive.code:         dep
  
      let buildReferencesNode referenceList =
          if referenceList = [] then () else
          let d = XElement(ns + "references")
          referenceList |> List.iter (buildReferenceNode >> d.Add)
          metadataNode.Add d
  
negative.code:         element
  
      let buildFrameworkReferencesNode frameworkAssembliesList =
          if List.isEmpty frameworkAssembliesList then () else
          let d = XElement(ns + "frameworkAssemblies")
          frameworkAssembliesList |> List.iter (buildFrameworkReferencesNode >> d.Add)
          metadataNode.Add d
  