anchor.diff:          is_integer(hd(SearchPattern)) ->
               [erlang:list_to_binary(SearchPattern)];
           is_list(SearchPattern) ->
  -            [erlang:iolist_to_binary(S) || S <- SearchPattern]
  +            [unicode:characters_to_binary(S) || S <- SearchPattern]
       end,
       binary:split(String, Pattern, [global]).
   -endif.
  
positive.code: 
  join(Delimiters, L) when is_binary(Delimiters) ->
      [[_ | H] | T] = [[Delimiters, S] || S <- L],
      iolist_to_binary([H | T]);
  join(Delimiters, L) when is_list(Delimiters) ->
      join_list(L, [], Delimiters).
  
  
negative.code:     binary().
  
  term_to_binary(T) ->
      unicode:characters_to_binary(io_lib:format("~w", [T])).
  
  %%-------------------------------------------------------------------------
  %% @doc
  