anchor.diff:  						  true),
   		    Master = self(),
   		    CIX = get_cix(),
  -		    TestAtoms = get_conflicting_atoms(CIX, ProcessPairs),
  +		    TestAtoms = case Type of
  +				    latin1 ->
  +					get_conflicting_atoms(CIX,
  +							      ProcessPairs);
  +				    unicode ->
  +					get_conflicting_unicode_atoms(CIX,
  +								      ProcessPairs)
  +				end,
   		    io:format("Testing with the following atoms all using "
   			      "cache index ~p:~n ~p~n",
   			      [CIX, TestAtoms]),
  
positive.code: 					 fun () ->
  						 Atom = receive
  							    {Ref, txt, ATxt} ->
  								list_to_atom(
  								  ATxt)
  							end,
  						 receive_ref_atom(Ref,
  								  Atom,
  
negative.code:     ?line stop_node(Node),
      ?line ok.
  
  atom_roundtrip_r15b(Config) when is_list(Config) ->
      case ?t:is_release_available("r15b") of
  	true ->
  	    ?line AtomData = atom_data(),
  	    ?line verify_atom_data(AtomData),
  	    ?line {ok, Node} = start_node(Config, [], "r15b"),
  	    ?line do_atom_roundtrip(Node, AtomData),
  	    ?line stop_node(Node),
  	    ?line ok;
  	false ->
  	    ?line {skip,"No OTP R15B available"}
      end.
  
  unicode_atom_roundtrip(Config) when is_list(Config) ->
      ?line AtomData = unicode_atom_data(),
      ?line verify_atom_data(AtomData),
      ?line {ok, Node} = start_node(Config),
      ?line do_atom_roundtrip(Node, AtomData),
      ?line stop_node(Node),
      ?line ok.
  
  do_atom_roundtrip(Node, AtomData) ->
      ?line Parent = self(),
  