anchor.diff:                  timestamp <- newtimestamp
                   prevConfig <- curConfig
                   prevPlatform <- curPlatform
  -                flags <- Some(MSBuild.CrackProject(projectfile, prevConfig, prevPlatform))
  +                let projectObj, projectObjFlags = MSBuild.CrackProject(projectfile, prevConfig, prevPlatform)
  +                flags <- Some(projectObjFlags)
               match flags with
               | Some flags -> flags
               | _ -> raise Error.Bug
  
positive.code:           member this.IsIncompleteTypeCheckEnvironment = false
            member this.TargetFrameworkMoniker = ""
            member this.LoadTime = System.DateTime(2000,1,1)
          
      // Attempt to treat as MSBuild project.
      let internal NewMSBuildProjectSite(configurationFunc, platformFunc, msBuildProjectName) = 
  
negative.code: 
              try        
                  try 
                      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()
  