anchor.diff:     Verbose: bool;
      FailOnError: FxCopErrorLevel;
      TimeOut: TimeSpan;
  -   ToolPath:string}
  +   ToolPath:string;
  +   ForceOutput: bool}
    
   let checkForErrors resultFile =
     // This version checks the result file with some Xml queries see
  
positive.code:     
      append param.ApplyOutXsl "/aXsl "
      append param.DirectOutputToConsole "/c "
        
      appendFormat "/cXsl:\"{0}\" " param.ConsoleXslFileName      
      appendItems "/d:\"{0}\" " param.DependencyDirectories      
  
negative.code:     Verbose = true;
      FailOnError = FxCopErrorLevel.DontFailBuild;
      TimeOut = TimeSpan.FromMinutes 5.
      ToolPath = ProgramFilesX86 @@ @"Microsoft Visual Studio 10.0\Team Tools\Static Analysis Tools\FxCop\FxCopCmd.exe"
      ForceOutput = false }
          
  /// Run FxCop on a group of assemblies.
  let FxCop setParams (assemblies: string seq) =
  