anchor.diff:      busy_disconnect_passive_send(S, MuchoData).
   
   busy_disconnect_passive_send(S, Data) ->
  -    ?line case gen_tcp:send(S, Data) of
  -	ok -> ?line busy_disconnect_passive_send(S, Data);
  +    case gen_tcp:send(S, Data) of
  +	ok -> busy_disconnect_passive_send(S, Data);
   	{error,closed} -> ok
       end.
   
  
positive.code: killing_multi_acceptors(doc) ->
      ["Check that multi acceptors behaves as expected when killed"];
  killing_multi_acceptors(Config) when is_list(Config) ->    
      ?line {ok,LS}=gen_tcp:listen(0,[]), 
      ?line Parent = self(),
      ?line F = fun() -> Parent ! {accepted,self(),gen_tcp:accept(LS)} end,
      ?line F2 = mktmofun(1000,Parent,LS),
      ?line Pid = spawn(F),
      ?line Pid2 = spawn(F2),
      ?line receive after 100 ->
  		    ok
  	    end,
      ?line {ok,L1} = prim_inet:getstatus(LS),
      ?line true = lists:member(accepting, L1),
      ?line exit(Pid,kill),
      ?line receive after 100 ->
  		    ok
  	    end,
      ?line {ok,L2} = prim_inet:getstatus(LS),
      ?line true  = lists:member(accepting, L2),
      ?line ok = ?EXPECT_ACCEPTS([{Pid2,{error,timeout}}],1,1000),
      ?line {ok,L3} = prim_inet:getstatus(LS),
      ?line false  = lists:member(accepting, L3),
      ok.
  
  killing_multi_acceptors2(suite) ->
  
negative.code:         {tcp_closed, Client} ->
              ok
      after 5000 ->
              test_server:fail(never_closed)
      
      end.
  
  