anchor.diff:  
   setup_active_timeout_sink(Timeout, AutoClose) ->
       Dir = filename:dirname(code:which(?MODULE)),
  -    {ok,R} = test_server:start_node(test_default_options_slave,slave,
  +    {ok,R} = test_server:start_node(?UNIQ_NODE_NAME, slave,
                                       [{args,"-pa " ++ Dir}]),
       Host = list_to_atom(lists:nth(2,string:tokens(atom_to_list(node()),"@"))),
       {ok, L} = gen_tcp:listen(0, [binary,{active,false},{packet,0},{nodelay, true},{keepalive, true},
  
positive.code: 
  end_per_group(_GroupName, Config) ->
      Config.
  
  %% Tests kernel application variables inet_default_listen_options and
  %% inet_default_connect_options.
  
negative.code: 
  do_delay_on_other_node(XArgs, Function) ->
      Dir = filename:dirname(code:which(?MODULE)),
      {ok,Node} = test_server:start_node(?UNIQ_NODE_NAME, slave,
                                         [{args,"-pa " ++ Dir ++ " " ++ XArgs}]),
      Res = rpc:call(Node,erlang,apply,[Function,[]]),
      test_server:stop_node(Node),
  