anchor.diff:  
               try        
                   try 
  -                    GetFlagsAndSources(project,host)
  +                    let flagsAndSources = GetFlagsAndSources(project,host)
  +                    (project, flagsAndSources)
                   with e -> 
                       System.Diagnostics.Debug.Assert(false, sprintf "Bug seen in MSBuild CrackProject: %s %s %s\n" (e.GetType().Name) e.Message (e.StackTrace))
                       reraise()
  
positive.code:                 timestamp <- newtimestamp
                  prevConfig <- curConfig
                  prevPlatform <- curPlatform
                  flags <- Some(MSBuild.CrackProject(projectfile, prevConfig, prevPlatform))
              match flags with
              | Some flags -> flags
              | _ -> raise Error.Bug
  
negative.code:           member this.IsIncompleteTypeCheckEnvironment = false
            member this.TargetFrameworkMoniker = ""
            member this.LoadTime = System.DateTime(2000,1,1)
            member this.ProjectGuid = 
                  let projectObj, projectObjFlags = MSBuild.CrackProject(projectfile, configurationFunc(), platformFunc())
                  projectObj.GetProperty(ProjectFileConstants.ProjectGuid).EvaluatedValue
          
      // Attempt to treat as MSBuild project.
      let internal NewMSBuildProjectSite(configurationFunc, platformFunc, msBuildProjectName) = 
  