anchor.diff:    match traceMode with
     | Console -> ()
     | Xml     -> closeTag "task" 
  -  ReportProgressFinish <| sprintf "Task: %s %s" task description
  -   
  -    
  -       +  ReportProgressFinish <| sprintf "Task: %s %s" task description       
positive.code: /// Traces the end of a target   
  let traceEndTarget name =
    match traceMode with
    | Console -> sprintf "Finished Target: %s" name |> trace
    | Xml     -> closeTag "target"
    ReportProgressFinish <| sprintf "Target: %s" name       
    
  
negative.code:     EnvironTarget.Process;
      EnvironTarget.User]
      |> List.iter (fun mode ->    
          traceFAKE "Environment-Settings (%A):" mode
          environVars mode |> List.iter (tracefn "  %A"))        
   
  /// Gets the FAKE Version string
  let fakeVersionStr = 
      fakeVersion.ToString()
        |> sprintf "FAKE - F# Make - Version %s" 
  
  /// Traces the begin of the build
  let traceStartBuild _ =
  