anchor.diff:  %%% connections to HTTP servers.
   -module(ns_connection_pool).
   
  --export([
  -        start_link/1,
  -        maybe_take_socket/2,
  -        put_socket/3
  -    ]).
  --export([
  -        init/1,
  -        handle_call/3,
  -        handle_cast/2,
  -        handle_info/2,
  -        code_change/3,
  -        terminate/2
  -    ]).
  +-export([start_link/1,
  +         maybe_take_socket/2,
  +         put_socket/3]).
  +
  +-export([init/1,
  +         handle_call/3,
  +         handle_cast/2,
  +         handle_info/2,
  +         code_change/3,
  +         terminate/2]).
   
   -behaviour(gen_server).
   
   -record(ns_connection_pool, {
  -        destinations = dict:new(),
  -        sockets = dict:new(),
  -        clients = dict:new(), % Pid => {Dest, MonRef}
  -        queues = dict:new(),  % Dest => queue of Froms
  -        max_pool_size = 50 :: non_neg_integer(),
  -        timeout = 300000 :: non_neg_integer()
  -    }).
  +          destinations = dict:new(),
  +          sockets = dict:new(),
  +          clients = dict:new(), % Pid => {Dest, MonRef}
  +          queues = dict:new(),  % Dest => queue of Froms
  +          max_pool_size = 50 :: non_neg_integer(),
  +          timeout = 300000 :: non_neg_integer()
  +         }).
   
   maybe_take_socket(Server, Dest) ->
       gen_server:call(Server, {socket, self(), Dest}, infinity).
  
positive.code:     process_flag(priority, high),
      case lists:member({seed,1}, ssl:module_info(exports)) of
          true ->
              % Make sure that the ssl random number generator is seeded
              % This was new in R13 (ssl-3.10.1 in R13B vs. ssl-3.10.0 in R12B-5)
              apply(ssl, seed, [crypto:rand_bytes(255)]);
          false ->
              ok
  
negative.code:         {ok, Q} ->
              {{value, From}, Q2} = queue:out(Q),
              Queues2 = case queue:is_empty(Q2) of
                            true ->
                                dict:erase(Dest, Queues);
                            false ->
                                dict:store(Dest, Q2, Queues)
                        end,
              {ok, From, Queues2}
      end.
  
  