anchor.diff:                      if value <> null then fields.Add(field.FieldName, value)
                   | _ -> ()
           fields
  -        
  +    
       /// Searches for documents over the index using the query and returns the documents as a sequence
       let searchDocumentSeq (indexWriter : IndexWriter.T, query : Query, searchQuery : SearchQuery.Dto) = 
           let (hits, highlighterOptions, recordsReturned, totalAvailable, indexSearchers) = 
               search (indexWriter, query, searchQuery)
           
           let inline getHighlighter (document : Document, shardIndex, doc) = 
  -            if highlighterOptions.IsSome then
  +            if highlighterOptions.IsSome then 
                   let (field, highlighter) = highlighterOptions.Value
                   let text = document.Get(field.SchemaName)
                   if text <> null then 
                       let tokenStream = 
                           TokenSources.GetAnyTokenStream
                               (indexSearchers.[shardIndex].IndexReader, doc, field.SchemaName, 
  -                                indexWriter.Settings.SearchAnalyzer)
  +                             indexWriter.Settings.SearchAnalyzer)
                       let frags = 
                           highlighter.GetBestTextFragments
                               (tokenStream, text, false, searchQuery.Highlights.FragmentsToReturn)
  -                    frags 
  -                    |> Array.filter(fun frag -> notNull(frag) && frag.GetScore() > float32 (0.0))
  -                    |> Array.map(fun frag -> frag.ToString()) 
  -                else
  -                    Array.empty<string>
  +                    frags
  +                    |> Array.filter (fun frag -> notNull (frag) && frag.GetScore() > float32 (0.0))
  +                    |> Array.map (fun frag -> frag.ToString())
  +                else Array.empty<string>
               else Array.empty<string>
           
           let results = 
  
positive.code:                     resultDoc.IndexName <- indexWriter.Settings.IndexName
                      resultDoc.TimeStamp <- int64 (document.Get(indexWriter.GetSchemaName(Constants.LastModifiedField)))
                      resultDoc.Fields <- fields
                      resultDoc.Score <- if searchQuery.ReturnScore then float (hit.Score) else 0.0
                      resultDoc.Highlights <- getHighlighter (document, hit.ShardIndex, hit.Doc)
                      yield resultDoc
              }
  
negative.code:                         match searchQuery.MissingValueConfiguration.TryGetValue(fieldName) with
                          | true, configuration -> 
                              match configuration with
                              | MissingValueOption.Default -> return! v |> getFieldValueAsArray fieldName
                              | MissingValueOption.ThrowError -> return! fail (MissingFieldValue(fieldName))
                              | MissingValueOption.Ignore -> 
                                  generateMatchAllQuery := true
  