anchor.diff:                  ("{version}", System.Reflection.Assembly.GetExecutingAssembly().GetName().Version.ToString())
           else sprintf "FlexSearch %s" (System.Reflection.Assembly.GetExecutingAssembly().GetName().Version.ToString())
       
  -    override this.Process(request, _) = 
  +    override __.Process(request, _) = 
           request.OwinContext.Response.ContentType <- "text/html"
           request.OwinContext.Response.StatusCode <- 200
           SuccessResponse (await (request.OwinContext.Response.WriteAsync htmlPage), HttpStatusCode.OK)
  
positive.code: [<Sealed>]
  type AnalyzeTextHandler(analyzerService : IAnalyzerService) = 
      inherit HttpHandlerBase<AnalysisRequest, string>()
      override this.Process(request, body) = 
          SomeResponse(analyzerService.Analyze(request.ResId.Value, body.Value.Text), Ok, BadRequest)
  
  /// <summary>
  
negative.code: [<Sealed>]
  type GetDocumentsHandler(documentService : IDocumentService) = 
      inherit HttpHandlerBase<NoBody, SearchResults>()
      override __.Process(request, _) = 
          let count = request.OwinContext |> intFromQueryString "count" 10 
          SomeResponse(documentService.GetDocuments(request.ResId.Value, count), Ok, BadRequest)
  
  