anchor.diff:      let listPackages (packages: System.Collections.Generic.KeyValuePair<GroupName*PackageName, PackageResolver.ResolvedPackage> seq) =
           packages
           |> Seq.map (fun kv ->
  -                let groupName,packageName = kv.Key                
  +                let groupName,packageName = kv.Key
                   groupName.ToString(),packageName.ToString(),kv.Value.Version.ToString())
           |> Seq.toList
   
  
positive.code:         let cancellationToken = defaultArg cancellationToken (System.Threading.CancellationToken())
          let maxResults = defaultArg maxResults 1000
          let sources = this.GetSources() |> Seq.map (fun kv -> kv.Value) |> List.concat |> List.distinct
          if sources = [] then [PackageSources.DefaultNugetSource] else sources
          |> List.choose (fun x -> match x with | Nuget s -> Some s.Url | _ -> None)
          |> Seq.distinct
          |> Seq.map (fun url ->
  
negative.code:                 path
              else
                  let parent = dir.Parent
                  match parent with
                  | null ->
                      if withError then
                          failwithf "Could not find '%s'. To use Paket with this solution, please run 'paket init' first." Constants.DependenciesFileName
                      else
                          Constants.DependenciesFileName
                  | _ -> findInPath(parent, withError)
  
          let dependenciesFileName = findInPath(DirectoryInfo path,true)
          verbosefn "found: %s" dependenciesFileName
  