anchor.diff:  -include_lib("kernel/include/dist_util.hrl").
   
   -include("ssl_api.hrl").
  -
  -%%%-undef(trace).
  -%%%%%-define(trace, true).
  -%%%-ifdef(trace).
  -%%%trace(Module, FunctionName, Line, Info, Value) ->
  -%%%    erlang:display(
  -%%%      [{erlang:convert_time_unit(
  -%%%          erlang:monotonic_time()
  -%%%          - erlang:system_info(start_time), native, microsecond),
  -%%%        node(), self()},
  -%%%       {Module, FunctionName, Line}, Info, Value]),
  -%%%    Value.
  -%%%-else.
  -%%%trace(_Module, _FunctionName, _Line, _Info, Value) -> Value.
  -%%%-endif.
  -%%%-undef(trace).
  -%%%-define(
  -%%%   trace(Info, Body),
  -%%%   trace(?MODULE, ?FUNCTION_NAME, ?LINE, (Info), begin Body end)).
  -trace(Term) -> Term.
   
   %% -------------------------------------------------------------------------
   
  
positive.code:             Opts = get_ssl_options(server),
              wait_for_code_server(),
              case ssl:ssl_accept(
                     Socket, [{active, false}, {packet, 4}] ++ Opts) of
                  {ok, #sslsocket{pid = DistCtrl} = SslSocket} ->
                      monitor_pid(DistCtrl),
                      trace(
  
negative.code:                     case ssl:connect(
                             Ip, TcpPort,
                             [binary, {active, false}, {packet, 4},
                              Driver:family(), nodelay()] ++ Opts,
                             net_kernel:connecttime()) of
  			{ok, #sslsocket{pid = DistCtrl} = SslSocket} ->
                              monitor_pid(DistCtrl),
                              ok = ssl:controlling_process(SslSocket, self()),
  