anchor.diff:          let mutable read = 0
           let mutable highBound = 0
   
  +        let matches = Array.zeroCreate 256
  +
           let mutable current = 0L
   
           let handle = Raw.CreateFile(index)
  
positive.code:         let mutable matchBound = 0
  
          let mutable task = null
  
          while (current < bound) && ((current = 0L) || (read > 0)) do
              if current > 0L then
  
negative.code:             if current > 0L then
                  let result = downloader task
                  countingTimer.Start()
                  counter := !counter + countMatchesDetailed result maxTemplateLength countingBound matchBound templateLengths prefix matches
                  countingTimer.Lap(label)
  
              if (read > 0) then
                  index <- index + 1
                  current <- current + (int64) read
  
                  if index = 50 then
                      printfn "I am %A and I've already read %A bytes!" label current
                      index <- 0
  
                  countingBound <- read
                  matchBound <- read
  