anchor.diff:        TimeOut : TimeSpan
         Version : string
         ReleaseNotes : string
  +      BuildConfig : string
  +      TemplateFile : string
         WorkingDir : string
         OutputPath : string }
   
  
positive.code: 
      let version = if String.IsNullOrWhiteSpace parameters.Version then "" else " version " + toParam parameters.Version
      let releaseNotes = if String.IsNullOrWhiteSpace parameters.ReleaseNotes then "" else " releaseNotes " + toParam (xmlEncode parameters.ReleaseNotes)
        
      let packResult = 
          ExecProcess 
              (fun info -> 
              info.FileName <- parameters.ToolPath
              info.Arguments <- sprintf "pack output %s%s%s" parameters.OutputPath version releaseNotes) parameters.TimeOut
      
      if packResult <> 0 then failwithf "Error during packing %s." parameters.WorkingDir
      traceEndTask "PaketPack" parameters.WorkingDir
  
negative.code:       TimeOut = TimeSpan.FromMinutes 5.
        Version = null
        ReleaseNotes = null
        BuildConfig = null
        TemplateFile = null
        WorkingDir = "."
        OutputPath = "./temp" }
  
  