anchor.diff:  		       "from an already started boot server."];
   inet_existing(Config) when is_list(Config) ->
       Name = erl_prim_test_inet_existing,
  -    Host = host(),
  -    Cookie = atom_to_list(erlang:get_cookie()),
  -    IpStr = ip_str(Host),
  -    LFlag = get_loader_flag(os:type()),
  -    Args = LFlag ++ " -hosts " ++ IpStr ++
  -	" -setcookie " ++ Cookie,
  -    {ok, BootPid} = erl_boot_server:start_link([Host]),
  -    {ok, Node} = start_node(Name, Args),
  +    BootPid = start_boot_server(),
  +    Node = start_node_using_inet(Name),
       {ok,[["inet"]]} = rpc:call(Node, init, get_argument, [loader]),
       stop_node(Node),
       unlink(BootPid),
  
positive.code: 			"but start the boot server afterwards."];
  inet_coming_up(Config) when is_list(Config) ->
      Name = erl_prim_test_inet_coming_up,
      Cookie = atom_to_list(erlang:get_cookie()),
      Host = host(),
      IpStr = ip_str(Host),
      LFlag = get_loader_flag(os:type()),
      Args = LFlag ++ 
  	" -hosts " ++ IpStr ++
  	" -setcookie " ++ Cookie,
      {ok, Node} = start_node(Name, Args, [{wait, false}]),
  
      %% Wait a while, then start boot server, and wait for node to start.
      test_server:sleep(test_server:seconds(6)),
      io:format("erl_boot_server:start_link([~p]).", [Host]),
      {ok, BootPid} = erl_boot_server:start_link([Host]),
      wait_really_started(Node, 25),
  
      %% Check loader argument, then cleanup.
  
negative.code: 
  stop_node(Node) ->
      test_server:stop_node(Node).
  
  compile_app(TopDir, AppName) ->
      AppDir = filename:join([TopDir, AppName]),
  