anchor.diff:          info.Arguments <- args) timeOut)
       then
           failWith()
  +
  +/// [omit]
  +let rec runNuGetTrial retries toolPath timeOut args failWith =
  +    if retries <= 0 then
  +        runNuGet toolPath timeOut args failWith
  +    else
  +        try
  +            runNuGet toolPath timeOut args failWith
  +        with
  +        | _ -> runNuGetTrial (retries-1) toolPath timeOut args failWith
  +        
   
   /// [omit]
   let buildNuGetArgs setParams packageId = 
  
positive.code:     { ToolPath: string
        Sources: string list
        TimeOut: TimeSpan
        OutputPath: string}
  
  /// RestorePackage defaults parameters
  
negative.code:     let parameters = RestoreSinglePackageDefaults |> setParams
  
      let args = buildNuGetArgs setParams packageId
      runNuGetTrial parameters.Retries parameters.ToolPath parameters.TimeOut args (fun () -> failwithf "Package installation of package %s failed." packageId)
    
      traceEndTask "RestorePackageId" packageId
  
  