anchor.diff:      true = Node =/= nonode@nohost,
       NodeL = atom_to_list(Node),
       [ _, HostL ] = string:lexemes(NodeL, "@"),
  +    BaseName = atom_to_list(?FUNCTION_NAME),
   
       %% Use -hidden nodes to avoid global connecting all nodes
   
       %% Start node A with different cookie
  -    NodeAName = "nodeA",
  +    NodeAName = BaseName++"_nodeA",
       NodeA = list_to_atom(NodeAName++"@"++HostL),
  -    NodeACookie = nodeAcookie,
  +    NodeACookieL = BaseName++"_cookieA",
  +    NodeACookie = list_to_atom(NodeACookieL),
       true = erlang:set_cookie( NodeA, NodeACookie ),
       { ok, NodeA } =
  -        start_node(
  -          "-hidden", NodeAName,
  -          "-setcookie "++atom_to_list(NodeACookie) ),
  +        start_node( "-hidden", NodeAName, "-setcookie "++NodeACookieL ),
       try
   
           %% Verify the cluster
  
positive.code:     end,
      [] = nodes(hidden),
      ok.
  
  %% Misc. functions
  
  
negative.code:          dist_ctrl_proc_smoke/1,
           dist_ctrl_proc_reject/1,
           erl_uds_dist_smoke_test/1,
           erl_1424/1, differing_cookies/1,
           cmdline_setcookie_2/1, connection_cookie/1]).
  
  %% Performs the test at another node.
  -export([get_socket_priorities/0,
  