anchor.diff:  
       let setCaretLine (s:string) =
           let line = editor.GetLineByOffset editor.CaretOffset
  -        editor.ReplaceText(line.Offset, line.EndOffset - line.Offset, s)
  +        editor.ReplaceText(line.Offset, line.EndOffset - line.Offset, "> " + s)
   
       member x.Session = session
       member x.Shutdown()  =
  
positive.code:         editor.InsertAtCaret (nonBreakingSpace + t)
  
      let prompt() =
          editor.InsertAtCaret ("\n")
  
      let setupSession() =
          try
  
negative.code: 
      static member Fsi =
          FSharpInteractivePad2.Pad |> Option.bind (fun pad -> Some(pad.Content :?> FSharpInteractivePad2))
  
      override x.Initialize(_container:MonoDevelop.Ide.Gui.IPadWindow) =
          do 
              LoggingService.LogDebug ("InteractivePad: created!")
              editor.MimeType <- "text/x-fsharp"
  