anchor.diff:  
   
           let rec parseWord (data:StringBuilder) (input:string) index inQuotes =
  -            if input.Length <= index
  -            then
  +            if input.Length <= index then
                   if data.Length > 0 && not inQuotes then Some(data.ToString(), index)
                   else None
               else
  
positive.code:             | _ -> true
  
  
          let rec parseFullCondition data (sb:System.Text.StringBuilder) (input:string) index =
              if input.Length <= index
              then data
              else
  
negative.code:                         | Some(right, index) ->
                              Some(left, comp, right, index)
  
          let rec parseAndOr (data:StringBuilder) (input:string) index =
              if input.Length <= index then None else
  
              let c = input.[index]
  