anchor.diff:          {{value, {QueryField, QueryTerm}}, NewQueries} ->
               %% Get the next queued query, then search...
               Node = choose(State#state.nodes),
  -            {_, _} = rpc:call(Node, search, search, [QueryField ++ ":" ++ QueryTerm]),
  +            {_, _} = rpc:call(Node, search, search, [list_to_binary(QueryField ++ ":" ++ QueryTerm)]),
               {ok, State#state { queries=NewQueries }};
           {empty, NewQueries} ->
               %% No queries queued up, so just search for something...
  
positive.code: %% returns a valgen function that takes an array of Fields and an
  %% array of Terms. The valgen function is then called by this module
  %% (the driver).
  valgen(MaxFields, MaxTerms) ->
      fun(Fields, Terms) ->
          %% Get the field names...
          NumFields = random:uniform(MaxFields) + 1,
  
negative.code: -export([
      new/1,
      run/4,
      valgen/3,
      file_to_array/1, file_to_array/2 % Get rid of compiler warnings.
  ]).
  
  