anchor.diff:            Log.verbf "Checker Arguments: %O" (Log.formatArgs args)
   
             let options = checker.GetProjectOptionsFromCommandLineArgs(projFileName, args)
  -          
  +
             let results = checker.ParseAndCheckProject(options) |> Async.RunSynchronously
             let mapError (err:FSharpErrorInfo) =
               sprintf "**** %s: %s" (if err.Severity = Microsoft.FSharp.Compiler.FSharpErrorSeverity.Error then "error" else "warning") err.Message
  
positive.code:                  yield sprintf "-r:%s" fsCoreLib.Value
                 yield "--out:" + dllName
                 yield "--doc:" + xmlName
                 yield "--warn:3" 
                 yield "--fullpaths" 
                 yield "--flaterrors" 
                 yield "--target:library" 
                 for dllFile in dllFiles do
                     yield "-r:"+dllFile
                 for libDir in libDirs do
  
negative.code:       let findFSCore dllFiles libDirs =
          // lets find ourself some FSharp.Core.dll
          let tried =
            dllFiles @ (fscoreResolveDirs libDirs
                        |> List.map (fun (l:string) -> getLib l "FSharp.Core"))
          match tried |> Seq.tryPick tryCheckFsCore with
          | Some s -> s
          | None ->
              let paths = Log.formatPaths tried
              Log.critf "Could not find a FSharp.Core.dll (with bundled .optdata and .sigdata) in %s" paths
              failwithf "Could not find a FSharp.Core.dll (with bundled .optdata and .sigdata) in %s" paths
  