anchor.diff:  
     /// Generates references for the current project & configuration as a 
     /// list of strings of the form [ "-r:<full-path>"; ... ]
  -  let private generateReferences (items:ProjectItemCollection, langVersion, targetFramework, configSelector, shouldWrap) = 
  +  let private generateReferences (project:DotNetProject, items:ProjectItemCollection, langVersion, targetFramework, configSelector, shouldWrap) = 
      [ // Should we wrap references in "..."
       let wrapf = if shouldWrap then wrapFile else id
       let files = 
  
positive.code:                                                      fn.EndsWith(assumedFile, true, CultureInfo.InvariantCulture))
        match coreRef with
        | None ->
          let dirs = FSharpEnvironment.getDefaultDirectories(langVersion, targetFramework) 
          match FSharpEnvironment.resolveAssembly dirs assumedFile with
          | Some fn -> yield "-r:" + wrapf(fn)
          | None -> Debug.WriteLine(sprintf "Resolution: Assembly resolution failed when trying to find default reference for '%s'!" assumedFile)
        | Some r -> 
          Debug.WriteLine(sprintf "Resolution: Found '%s' reference '%s'" assumedFile r)
        
  
negative.code:   /// F# compiler options (debugging, tail-calls etc.), custom command line
    /// parameters and assemblies referenced by the project ("-r" options)
    let generateCompilerOptions (fsconfig:FSharpCompilerParameters, reqLangVersion, targetFramework, items, configSelector, shouldWrap) =
      let project = fsconfig.ParentConfiguration.ParentItem
      let dashr = generateReferences (project, items, reqLangVersion, targetFramework, configSelector, shouldWrap) |> Array.ofSeq
      let defines = fsconfig.DefineConstants.Split([| ';'; ','; ' ' |], StringSplitOptions.RemoveEmptyEntries)
      [  yield "--noframework"
         for symbol in defines do yield "--define:" + symbol
  