anchor.diff:      rpc:call(Node,cover_test_mod,foo,[]),
       {ok,Node} = ct_slave:stop(N1),
       ok.
  +slave(cleanup,_Config) ->
  +    kill_slaves([nodename(slave,1)]).
   
  -slave_start_slave(Config) ->
  +slave_start_slave(_Config) ->
       cover_compiled = code:which(cover_test_mod),
       cover_test_mod:foo(),
       N1 = nodename(slave_start_slave,1),
  
positive.code:     {ok,Host} = inet:gethostname(),
      list_to_atom(atom_to_list(Name) ++ "@" ++ Host).
  
  kill_slaves(Case, [Node|Nodes]) ->
      Prefix = nodeprefix(Case),
      case lists:prefix(Prefix,atom_to_list(Node)) of
  	true ->
  	    rpc:call(Node,erlang,halt,[]);
  	_ ->
  	    ok
      end,
      kill_slaves(Case,Nodes);
  kill_slaves(_,[]) ->
      ok.
  
  start_slave(Name) ->
  
negative.code:     test_server:break(""),
      ok.
  
  default(_Config) ->
      cover_compiled = code:which(cover_test_mod),
      cover_test_mod:foo(),
      ok.
  
  slave(_Config) ->
      cover_compiled = code:which(cover_test_mod),
      cover_test_mod:foo(),
      N1 = nodename(slave,1),
  