anchor.diff:      member x.M = ()
   """
           let buffer = createMockTextBuffer content fileName
  +        helper.SetUpProjectAndCurrentDocument(createVirtualProject(buffer, fileName), fileName)
           let tagger = helper.GetTagger(buffer)
           testEvent tagger.TagsChanged "Timed out before tags changed" timeout
               (fun () -> 
  
positive.code: type Hoge () =
  """
          let buffer = createMockTextBuffer content fileName
          let tagger = helper.GetTagger(buffer)
          testEvent tagger.TagsChanged "Timed out before tags changed" timeout
              (fun () -> 
  
negative.code: type DepthTaggerHelper() =
      inherit VsTestBase()
  
      let taggerProvider = DepthColorizerTaggerProvider(base.ServiceProvider, base.DocumentFactoryService, base.ProjectFactory, base.VsLanguageService)
  
      member __.GetTagger(buffer) = 
          taggerProvider.CreateTagger<_>(buffer)
  