anchor.diff:    // and its time to re-typecheck the current file.
     let checker = 
       let dispatch file = 
  -      DispatchService.GuiDispatch(fun () ->
  +      DispatchService.GuiDispatch(fun () -> 
           try Debug.WriteLine(sprintf "Parsing: Considering re-typcheck of: '%s' because compiler reports it needs it" file)
  -                     let doc = IdeApp.Workbench.ActiveDocument
  -                     if doc <> null && doc.FileName.FullPath.ToString() = file then 
  +            let doc = IdeApp.Workbench.ActiveDocument
  +            if doc <> null && doc.FileName.FullPath.ToString() = file then 
                   Debug.WriteLine(sprintf "Parsing: Requesting re-parse of: '%s' because some errors were reported asynchronously and we should return a new document showing these" file)
  -                         doc.ReparseDocument()
  +                doc.ReparseDocument()
           with exn  -> () )
                                               
       InteractiveChecker.Create(NotifyFileTypeCheckStateIsDirty dispatch)
  
positive.code:         match crackSymbolTextAtGetMethodsTrigger(offset, doc) with 
          | None -> None
          | Some(line,col,lineStr,identIsland,currentIdent,token) ->
              let res = info.GetMethods((line, col), lineStr, Some identIsland, token)
              Debug.WriteLine( "Result: Got something, returning"  )
              Some res 
              
      member x.Untyped with get() = untyped 
  
  
negative.code:             Debug.WriteLine("CheckOptions: Adding missing core assemblies.")
              let dirs = ScriptOptions.getDefaultDirectories (FSharpCompilerVersion.LatestKnown, TargetFrameworkMoniker.NET_4_0 )
              {opts with ProjectOptions = [| yield! opts.ProjectOptions; 
                                             match ScriptOptions.resolveAssembly dirs "FSharp.Core" with
                                             | Some fn -> yield sprintf "-r:%s" fn
                                             | None -> Debug.WriteLine("Resolution: FSharp.Core assembly resolution failed!")
                                             match ScriptOptions.resolveAssembly dirs "FSharp.Compiler.Interactive.Settings" with
                                             | Some fn -> yield sprintf "-r:%s" fn
                                             | None -> Debug.WriteLine("Resolution: FSharp.Compiler.Interactive.Settings assembly resolution failed!") |]}
          with e -> failwithf "Exception when getting check options for '%s'\n.Details: %A" fileName e
            
  