anchor.diff:     [basic/1,
       api_open_close/1,api_listen/1,api_connect_init/1,api_opts/1,
       xfer_min/1,xfer_active/1,def_sndrcvinfo/1,implicit_inet6/1,
  -    basic_stream/1, xfer_stream_min/1, peeloff/1, buffers/1,
       open_multihoming_ipv4_socket/1,
       open_unihoming_ipv6_socket/1,
       open_multihoming_ipv6_socket/1,
  -    open_multihoming_ipv4_and_ipv6_socket/1]).
  +    open_multihoming_ipv4_and_ipv6_socket/1,
  +    basic_stream/1, xfer_stream_min/1, peeloff_active_once/1,
  +    peeloff_active_true/1, buffers/1]).
   
   suite() -> [{ct_hooks,[ts_install_cth]}].
   
   all() -> 
       [basic, api_open_close, api_listen, api_connect_init,
        api_opts, xfer_min, xfer_active, def_sndrcvinfo, implicit_inet6,
  -     basic_stream, xfer_stream_min, peeloff, buffers,
        open_multihoming_ipv4_socket,
        open_unihoming_ipv6_socket,
        open_multihoming_ipv6_socket,
  -     open_multihoming_ipv4_and_ipv6_socket].
  +     open_multihoming_ipv4_and_ipv6_socket,
  +     basic_stream, xfer_stream_min, peeloff_active_once,
  +     peeloff_active_true, buffers].
   
   groups() -> 
       [].
  
positive.code: %%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  %%% socket gen_server ultra light
  
  socket_open(SocketOpts, Timeout) ->
      Opts = [{type,seqpacket},{active,once},binary|SocketOpts],
      Starter =
  	fun () ->
  		{ok,Socket} =
  
negative.code: 	end,
      s_start(Starter, Timeout).
  
  socket_peeloff(Socket, AssocId, SocketOpts, Timeout) ->
      Opts = [binary|SocketOpts],
      Starter =
  	fun () ->
  		{ok,NewSocket} =
  