anchor.diff:              .AddGit(group, repository, version)
   
   let validateConfig (results : ParseResults<_>) =
  -    let credential = results.Contains <@ ConfigArgs.AddCredentials @>
  -    let token = results.Contains <@ ConfigArgs.AddToken @>
  +    let credential = results.Contains ConfigArgs.AddCredentials
  +    let token = results.Contains ConfigArgs.AddToken
       match credential, token with
  -    | true, _ -> results.GetResults <@ ConfigArgs.AddCredentials @> |> List.isEmpty |> not
  -    | _, true -> results.GetResults <@ ConfigArgs.AddToken @> |> List.isEmpty |> not
  +    | true, _ -> results.GetResults ConfigArgs.AddCredentials |> List.isEmpty |> not
  +    | _, true -> results.GetResults ConfigArgs.AddToken |> List.isEmpty |> not
       | _ -> false
   
   let config (results : ParseResults<_>) =
  -    let credentials = results.Contains <@ ConfigArgs.AddCredentials @>
  -    let token = results.Contains <@ ConfigArgs.AddToken @>
  +    let credentials = results.Contains ConfigArgs.AddCredentials
  +    let token = results.Contains ConfigArgs.AddToken
       match credentials, token with
       | true, _ ->
  -      let args = results.GetResults <@ ConfigArgs.AddCredentials @>
  +      let args = results.GetResults ConfigArgs.AddCredentials
         let source = args.Item 0
  -      let username, password = results.GetResult (<@ ConfigArgs.Username @>, ""), results.GetResult (<@ ConfigArgs.Password @>, "")
  -      let authType = results.GetResult (<@ ConfigArgs.AuthType @>, "")
  -      let verify = results.Contains <@ ConfigArgs.Verify @>
  +      let username, password = results.GetResult (ConfigArgs.Username, ""), results.GetResult (ConfigArgs.Password, "")
  +      let authType = results.GetResult (ConfigArgs.AuthType, "")
  +      let verify = results.Contains ConfigArgs.Verify
   
         Dependencies(".").AddCredentials(source, username, password, authType, verify)
       | _, true ->
  -      let args = results.GetResults <@ ConfigArgs.AddToken @>
  +      let args = results.GetResults ConfigArgs.AddToken
         let source, token = args.Item 0
         Dependencies(".").AddToken(source, token)
       | _ -> ()
  
positive.code:     results.GetAllResults().Length = 1
  
  let autoRestore (results : ParseResults<_>) =
      match results.GetResult <@ Flags @> with
      | On -> Dependencies.Locate().TurnOnAutoRestore()
      | Off -> Dependencies.Locate().TurnOffAutoRestore()
  
  let convert (results : ParseResults<_>) =
      let force = results.Contains <@ ConvertFromNugetArgs.Force @>
      let noInstall = results.Contains <@ ConvertFromNugetArgs.No_Install @>
      let noAutoRestore = results.Contains <@ ConvertFromNugetArgs.No_Auto_Restore @>
      let credsMigrationMode =
          (results.TryGetResult <@ ConvertFromNugetArgs.Migrate_Credentials @>,
           results.TryGetResult <@ ConvertFromNugetArgs.Migrate_Credentials_Legacy @>)
          |> legacyOption results (ReplaceArgument("--migrate-credentials", "--creds-migration"))
  
      Dependencies.ConvertFromNuget(force, noInstall |> not, noAutoRestore |> not, credsMigrationMode)
  
  let findRefs (results : ParseResults<_>) =
      let packages =
          let arg = (results.TryGetResult <@ FindRefsArgs.NuGets @>,
                     results.TryGetResult <@ FindRefsArgs.NuGets_Legacy @>)
                    |> legacyOption results (OmitArgument "nuget")
          require arg (fun _ -> results.GetResult <@ FindRefsArgs.NuGets @>)
      let group =
          let arg = (results.TryGetResult <@ FindRefsArgs.Group @>,
                     results.TryGetResult <@ FindRefsArgs.Group_Legacy @>)
                    |> legacyOption results (ReplaceArgument("--group", "group"))
  
          defaultArg arg (Constants.MainDependencyGroup.ToString())
  
negative.code: 
  let fixNuspecs silent (results : ParseResults<_>) =
      let nuspecFiles =
          results.GetResult FixNuspecsArgs.Files
          |> List.collect (fun s -> s.Split([|';'|], StringSplitOptions.RemoveEmptyEntries) |> Array.toList)
          |> List.map (fun s -> s.Trim())
  
      match results.TryGetResult FixNuspecsArgs.ProjectFile with
      | Some projectFile ->
          let projectFile = Paket.ProjectFile.LoadFromFile(projectFile)
          let refFile = RestoreProcess.FindOrCreateReferencesFile projectFile
          Dependencies.FixNuspecs (refFile, nuspecFiles)
      | None ->
          match results.TryGetResult FixNuspecsArgs.ReferencesFile with
          | Some referenceFile ->
              traceWarnfn "using the references-file argument is obsolete, please use project-file instead"
  
  