anchor.diff:  
       ok.
   
  +
  +
  +erlang_halt(Config) when is_list(Config) ->
  +    try erlang:halt(undefined) of
  +	_-> ?t:fail({erlang,halt,{undefined}})
  +    catch error:badarg -> ok end,
  +    try halt(undefined) of
  +	_-> ?t:fail({halt,{undefined}})
  +    catch error:badarg -> ok end,
  +    try erlang:halt(undefined, []) of
  +	_-> ?t:fail({erlang,halt,{undefined,[]}})
  +    catch error:badarg -> ok end,
  +    try halt(undefined, []) of
  +	_-> ?t:fail({halt,{undefined,[]}})
  +    catch error:badarg -> ok end,
  +    try halt(0, undefined) of
  +	_-> ?t:fail({halt,{0,undefined}})
  +    catch error:badarg -> ok end,
  +    try halt(0, [undefined]) of
  +	_-> ?t:fail({halt,{0,[undefined]}})
  +    catch error:badarg -> ok end,
  +    try halt(0, [{undefined,true}]) of
  +	_-> ?t:fail({halt,{0,[{undefined,true}]}})
  +    catch error:badarg -> ok end,
  +    try halt(0, [{flush,undefined}]) of
  +	_-> ?t:fail({halt,{0,[{flush,undefined}]}})
  +    catch error:badarg -> ok end,
  +    try halt(0, [{flush,true,undefined}]) of
  +	_-> ?t:fail({halt,{0,[{flush,true,undefined}]}})
  +    catch error:badarg -> ok end,
  +    H = hostname(),
  +    {ok,N1} = slave:start(H, halt_node1),
  +    {badrpc,nodedown} = rpc:call(N1, erlang, halt, []),
  +    {ok,N2} = slave:start(H, halt_node2),
  +    {badrpc,nodedown} = rpc:call(N2, erlang, halt, [0]),
  +    {ok,N3} = slave:start(H, halt_node3),
  +    {badrpc,nodedown} = rpc:call(N3, erlang, halt, [0,[]]),
  +    ok.
  +
  +
  +
   %% Helpers
       
   id(I) -> I.
   
  +hostname() ->
  +    hostname(atom_to_list(node())).
  +
  +hostname([$@ | Hostname]) ->
  +    list_to_atom(Hostname);
  +hostname([_C | Cs]) ->
  +    hostname(Cs).
  
positive.code: %%
  %% %CopyrightBegin%
  %%
  %% Copyright Ericsson AB 2005-2011. All Rights Reserved.
  %%
  %% The contents of this file are subject to the Erlang Public License,
  %% Version 1.1, (the "License"); you may not use this file except in
  
negative.code: 	 types/1,
  	 t_list_to_existing_atom/1,os_env/1,otp_7526/1,
  	 binary_to_atom/1,binary_to_existing_atom/1,
  	 atom_to_binary/1,min_max/1, erlang_halt/1]).
  
  suite() -> [{ct_hooks,[ts_install_cth]}].
  
  