anchor.diff:  ﻿namespace Mandolin0
   
   open System
  +open System.Collections.Generic
   open System.Text
   open System.Reflection
  +open System.Threading
   open System.Runtime.InteropServices
   open Autofac
   open Nessos.UnionArgParser
  
positive.code:             Console.WriteLine("\t{0}", oracle)
  
      let continueSession() =
          let savedTop = Console.CursorTop
          Console.CursorTop <- !_restoreSessionConsoleTop
          Console.Write("A previous session already exists, do you want to continue? [Y/N] ")
          let restoreSession = ref String.Empty
          while !restoreSession <> "Y" && !restoreSession <> "N" do
              restoreSession := Console.ReadKey().KeyChar.ToString().ToUpper()
  
          Console.CursorTop <- savedTop
          (!restoreSession).Equals("Y", StringComparison.Ordinal)
  
negative.code:                     bruteforcer.ProcessStatistics.Add(printCurrentNumberOfRequestsPerMinuteHandler)
                      _nextCursorTopForUsername := Console.CursorTop
                      
                      // intercept the Ctrl+C signal through an input loop
                      Console.TreatControlCAsInput <- true
                      Console.CancelKeyPress.Add(fun _ -> ())
  
                      let (readKey, consumeKey) = createBlockingReadKey()
                      _readKeysHandlers.Add(10, consumeKey)
  
                      let sessionManager = container.Resolve<SessionManager>()
                      let saveCallBack = fun () -> sessionManager.SaveResult((!url).Value, (!oracle).Value, (!template).Value)
                      let deleteCallback = fun () -> sessionManager.DeleteResult((!url).Value, (!oracle).Value, (!template).Value)
                      async {
                          while true do
                              let c = readKey()
                              if c.Modifiers = ConsoleModifiers.Control && c.Key.ToString().Equals("C", StringComparison.OrdinalIgnoreCase) then
                                  handleCtrCancelEvent sessionManager saveCallBack deleteCallback |> ignore
                      } |> Async.Start
  
                      // start the read key loop dispatcher
                      async {
                          readKeyDispatcher()
                      } |> Async.Start
  
                      bruteforcer.Run((!url).Value) 
                      Configuration.okResult
  