anchor.diff:      NewS;
   
   l({'DOWN', _MRef, process, TPid, _}, #listener{pending = {_,Q}} = S) ->
  -    down(ets:member(Q, TPid), TPid, S);
  +    down(queue:member(TPid, Q), TPid, S);
   
   %% Timeout after the last accepting process has died.
   l({timeout, TRef, close = T}, #listener{tref = TRef,
  
positive.code: nq(Arg, Q) ->
      {ok, TPid} = diameter_sctp_sup:start_child(Arg),
      monitor(process, TPid),
      ets:insert(Q, {TPid, now()}),
      TPid.
  
  %% dq/1
  %%
  
negative.code: %% it to an existing association.
  
  dq(Q) ->
      {{value, TPid}, NQ} = queue:out(Q),
      {TPid, NQ}.
  
  %% assoc_id/1
  %%
  