anchor.diff:   
   type TokeniserOutput =
     | Token of FSharpTokenInfo * string | EndState of FSharpTokenizerLexState
  +  static member PlainHash = Token({LeftColumn=0
  +                                   RightColumn=0
  +                                   ColorClass=FSharpTokenColorKind.PreprocessorKeyword
  +                                   CharClass=FSharpTokenCharKind.Delimiter
  +                                   FSharpTokenTriggerClass=FSharpTokenTriggerClass.None
  +                                   Tag=0
  +                                   TokenName="#"
  +                                   FullMatchedLength=1}, "#")
   
   [<RequireQualifiedAccess>]
   type Prompt = Normal | Multiline | None
  
positive.code:      x.Add (textView)
       x.ShowAll ()
  
  
    member x.InitialiseEvents() =
      disposables.Add(
        PropertyService.PropertyChanged.Subscribe
  
negative.code: 
    let addDisposable =
      disposables.Add
  
    let updateColors() =
      let addTag (k:Tags) v = 
  