anchor.diff:                  references.Item(i + 1)
           }
   
  -    let generateFileContent(project: Project, tag: string) =
  +    let generateFileContent(project: Project) =
           let excludingList = set [| "FSharp.Core"; "mscorlib" |]
   
           let assemblyRefList = ResizeArray()
  
positive.code: 
      let generateFile (project: Project) =
          Option.ofNull project
          |> Option.map getProjectOutputs
          |> Option.iter (fun outputs -> 
              outputs
              |> Seq.iter (fun (KeyValue(tag, _)) ->
                   let fileName = if tag = "Debug" then "load-references.fsx" else String.Format("load-references-{0}.fsx", tag)
                   let content = generateFileContent(project, tag)
                   addFileToActiveProject(project, fileName, content)
                   let content = generateLoadScriptContent(project, fileName, tag)
                   let fileName = if tag = "Debug" then "load-project.fsx" else String.Format("load-project-{0}.fsx", tag)
                   addFileToActiveProject(project, fileName, content)))
      
      let getReferences (project: Project) =
          let excludingList = set [| "FSharp.Core"; "mscorlib" |]
  
negative.code: 
      let getActiveProject() =
          let dte = dte2 :?> DTE
          dte.ActiveSolutionProjects :?> obj []
          |> Seq.tryHead
          |> Option.map (fun o -> o :?> Project)
  
  