anchor.diff:                  | separator ->
                       /// A sorted copy of the separator array. Used with Array.BinarySearch
                       /// to quickly determine if a given character is a separator.
  -                    let sortedSeperators = Array.sort separator
  +                    let sortedSeparators = Array.sort separator
   
                       // The offset and length of the current substring.
                       let mutable offset = 0
  
positive.code:                     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
                                  // Apply the function to the current substring unless it's empty.
                                  if length > 0 then
                                      action <| 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.
                                  state <- folder.Invoke (state, substringIndex, Substring (str, offset, length))
  
  