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