anchor.diff:            raise <| 
               new FsiEvaluationException(
                 "Error while creating a fsi session.",
  -              sprintf "Fsi Arguments: %A" args,
  +              sprintf "Fsi Arguments: %s" (Log.formatArgs args),
                 { Output = out; Error = err },
                 e)
       
  
positive.code:                yield fileName1
              |]
  
            Log.verbf "Checker Arguments: %A" args
  #if DEBUG
            for arg in args do
              printfn "Checker Arg: %A" arg
  #endif
            let options = checker.GetProjectOptionsFromCommandLineArgs(projFileName, args)
            
            let results = checker.ParseAndCheckProject(options) |> Async.RunSynchronously
  
negative.code:   let warnf f = traceEventf TraceEventType.Warning f
    let critf f = traceEventf TraceEventType.Critical f
    let verbf f = traceEventf TraceEventType.Verbose f
  
    let formatArgs (args:_ seq) = System.String.Join(" ", args)
    let formatPaths paths =
      System.String.Join(", ", paths |> Seq.map (sprintf "\"%s\""))
  
  open Env
  [<AutoOpen>]
  