anchor.diff:  %% terminate with reason 'normal'.
   %% -------------------------------------------------------------------------
   
  +-compile({inline, [socket_options/0]}).
  +socket_options() ->
  +    [binary, {active, false}, {packet, 2}, {nodelay, true},
  +     {sndbuf, ?BUFFER_SIZE}, {recbuf, ?BUFFER_SIZE},
  +     {buffer, ?BUFFER_SIZE}].
  +
   %% -------------------------------------------------------------------------
   %% select/1 is called by net_kernel to ask if this distribution protocol
   %% is willing to handle Node
  
positive.code: %% -------------------------------------------------------------------------
  
  -define(TCP_ACTIVE, 16).
  -define(CHUNK_SIZE, (65536 - 512)).
  
  %% The start chunk starts with zeros, so it seems logical to
  %% not have a chunk type with value 0
  
negative.code: gen_listen(Name, Driver) ->
      case inet_tcp_dist:gen_listen(Driver, Name) of
          {ok, {Socket, Address, Creation}} ->
              inet:setopts(Socket, socket_options()),
              {ok,
               {Socket, Address#net_address{protocol = ?DIST_PROTO}, Creation}};
          Other ->
  