anchor.diff:  connect(Mod, Host, Port, Opts) ->
       Mod:connect(Host, Port, Opts).
   
  +%% send/2
  +
  +send(Bin, #transport{socket = Sock,
  +                     module = M}) ->
  +    case send(M, Sock, Bin) of
  +        ok ->
  +            ok;
  +        {error, Reason} ->
  +            x({send, Reason})
  +    end.
  +
   %% send/3
   
   send(gen_tcp, Sock, Bin) ->
  
positive.code:   when is_binary(Msg) ->
      throttle(T, S#transport{throttle_cb = F});
  
  %% Callback says to ask again in the specified number of milliseconds.
  throttle({timeout, Tmo}, #transport{} = S) ->
      erlang:send_after(Tmo, self(), throttle),
  
negative.code:     ?ERROR({T,S});
  
  %% Outgoing message.
  transition({diameter, {send, Bin}}, S) ->
      send(Bin, S);
  
  %% Request to close the transport connection.
  transition({diameter, {close, Pid}}, #transport{parent = Pid,
  