anchor.diff:                      if skipEmptyStrings options then
                           for i = 0 to len - 1 do
                               // Is the current character a separator?
  -                            if Array.BinarySearch (sortedSeperators, str.[i]) <> -1 then
  +                            if Array.BinarySearch (sortedSeparators, str.[i]) >= 0 then
                                   // Apply the function to the current substring unless it's empty.
                                   if length > 0 then
                                       state <- folder.Invoke (state, substringIndex, Substring (str, offset, length))
  
positive.code:                     else
                          for i = 0 to len - 1 do
                              // Is the current character a separator?
                              if Array.BinarySearch (sortedSeperators, str.[i]) <> -1 then
                                  // Apply the function to the current substring.
                                  state <- folder.Invoke (state, Substring (str, offset, length))
  
  
negative.code:                     else
                          for i = 0 to len - 1 do
                              // Is the current character a separator?
                              if Array.BinarySearch (sortedSeparators, str.[i]) >= 0 then
                                  // Apply the function to the current substring.
                                  action.Invoke (substringIndex, Substring (str, offset, length))
  
  