anchor.diff:              // introduce blank commits in case there are no logs to replay.
               shardWriter |> ShardWriter.refresh
               shardWriter.Status <- ShardWriter.Status.Online
  -        indexWriter.ShardWriters |> Array.Parallel.iter (fun shard -> replayShardTransaction (shard))
  +        indexWriter.ShardWriters |> Array.Parallel.iter replayShardTransaction
       
       /// Create a new index instance
       let create (settings : IndexSetting.T) = 
  
positive.code:                         while fileStream.Position <> fileStream.Length do
                              yield msgPackSerializer.Unpack(fileStream)
                      }
                  with _ -> Seq.empty
              else Seq.empty
          
          /// Append a new entry to TxLog        
  
negative.code:             shardWriter.Status <- ShardWriter.Status.Recovering
              // Read logs for the generation 1 higher than the last committed generation as
              // these represents the records which are not committed
              let logEntries = 
                  shardWriter.TxWriter.ReadLog(shardWriter.Generation.Value) 
                  // TODO: Find a more memory efficient way of sorting the transaction log file
                  |> Seq.sortBy (fun l -> l.TransactionId)
              for entry in logEntries do
                  match entry.Operation with
                  | TransactionLog.Operation.Create | TransactionLog.Operation.Update -> 
                      let doc = indexWriter.Template.Value |> DocumentTemplate.updateTempate entry.Document
  