anchor.diff:  let printUsage() = 
       loadTopShelf <- false
       printfn "%s" (parser.Usage(prefixUsageText))
  - 
  +
   [<EntryPoint>]
  -let main argv =
  -             
  +let main argv = 
       // Only parse arguments in case of interactive mode
  -    if notNull argv && argv.Length > 0 && StartUp.isInteractive then
  -        try
  +    if notNull argv && argv.Length > 0 && StartUp.isInteractive then 
  +        try 
               let results = parser.Parse(argv).GetAllResults()
  -        
               // We don't want TopShelf to process the incoming arguments.
               // TopShelf will only be used to process certain arguments
               // supported by it.
  
positive.code:             | Stop -> topShelfCommand <- "stop"
              | InstallManifest -> ()
              | UnInstallManifest -> ()
          with e ->
              printUsage()
      
      let result = runTopShelf()
      if StartUp.isInteractive then
          printfn "Press any key to continue . . ."
          Console.ReadKey() |> ignore
      result
      
negative.code: open System.IO
  open Topshelf
  
  module Installers = 
      open System.Diagnostics
      
      let out s = printfn "[FlexSearch.Install] %s" s
      
      let toQuotedString (s : string) = 
          if System.String.IsNullOrEmpty s then s
          elif s.Chars 0 = '"' then s
          else "\"" + s + "\""
      
      // Executes a given exe along with the passed argument 
      let exec path argument = 
  