anchor.diff:  open MonoDevelop.Ide.TypeSystem
   open MonoDevelop.SourceEditor
   open System.Threading.Tasks
  +open System.Collections.Generic
   [<AutoOpen>]
   module ColorHelpers =
       let strToColor s =
  
positive.code:     let mutable killIntent = NoIntent
      let mutable promptReceived = false
      let mutable activeDoc : IDisposable option = None
  
      let getCorrectDirectory () =
          if IdeApp.Workbench.ActiveDocument <> null && FileService.isInsideFSharpFile() then
  
negative.code:         context :? FsiDocumentContext
  
      override x.KeyPress (descriptor:KeyDescriptor) =
          match FSharpInteractivePad2.Fsi with
          | Some fsi -> 
              match descriptor.SpecialKey with
              | SpecialKey.Return -> 
                      let line =
                          x.Editor.CaretLine
                          |> x.Editor.GetLine 
  
                      fsi.SendCommand (line |> x.Editor.GetLineText)
                      x.Editor.CaretOffset <- line.EndOffset
                      x.Editor.InsertAtCaret "\n"
                      false
              | SpecialKey.Up -> 
                  fsi.ProcessCommandHistoryUp()
                  false        
              | SpecialKey.Down -> 
                  fsi.ProcessCommandHistoryDown()
                  false
              | _ -> base.KeyPress (descriptor)
          | _ -> base.KeyPress (descriptor)
  
  
  type FSharpInteractivePad() as this =
      inherit MonoDevelop.Ide.Gui.PadContent()
  