anchor.diff:                         treeView.ExpandAll()
                      | None -> ())
           Gdk.Threads.Leave()
  -    
  +        refreshingOutline <- false
  +        timerId <- 0u
  +        false
  + 
       override x.Dispose() = 
           // more stuff here
  +        printf "%s" "Disposed"
           base.Dispose()
       interface IOutlinedDocument with
           member x.GetOutlineWidget() = 
  
positive.code:                 padTreeView.TextRenderer.Ypad <- 0u
  
                  let treeCol = new TreeViewColumn()
                  treeCol.Title <- "HI I AM A COLUMN"
                  treeCol.PackStart(pixRenderer, false)
                  // treeCol.AddAttribute (padTreeView.TextRenderer,"text",1)
                  treeCol.SetCellDataFunc(pixRenderer, new TreeCellDataFunc(setCellIcon))
  
negative.code:     
      //    IdeApp.Workbench.ActiveDocument <> null && IdeApp.Workbench.ActiveDocument.Name = x.DocumentContext.Name
      member private x.UpdateDocumentOutline _ = 
          if not refreshingOutline then
              refreshingOutline <- true
              timerId <- GLib.Timeout.Add (3000u, (fun _ -> x.refillTree))
  
      member private x.refillTree = 
  
          let ast = maybe { let! context = x.DocumentContext |> Option.ofNull
                            let! parsedDocument = context.ParsedDocument |> Option.ofNull
                            let! ast = parsedDocument.Ast |> Option.tryCast<ParseAndCheckResults>
  