anchor.diff:    when is_pid(TPid) ->
       lists:foreach(fun failover/1, match_requests(TPid));
   %% Note that a request process can store its request after failover
  -%% notifications are sent here: store_request/4 sends the notification
  +%% notifications are sent here: store_request/2 sends the notification
   %% in that case.
   
   %% Failover as a consequence of request_peer_down/1: inform the
  
positive.code: 
  send_request(TPid, #diameter_packet{bin = Bin} = Pkt, Req, _SvcName, Timeout)
    when node() == node(TPid) ->
      %% Store the outgoing request before sending to avoid a race with
      %% reply reception.
      TRef = store_request(TPid, Bin, Req, Timeout),
      send(TPid, Pkt),
      TRef;
  
  
negative.code: %% send/1
  
  send({TPid, Pkt, #request{handler = Pid} = Req0, SvcName, Timeout, TRef}) ->
      Req = Req0#request{handler = self()},
      recv(TPid, Pid, TRef, send_request(TPid, Pkt, Req, SvcName, Timeout)).
  
  %% recv/4
  %%
  %% Relay an answer from a remote node.
  
  recv(TPid, Pid, TRef, LocalTRef) ->
      receive
          {answer, _, _, _, _} = A ->
              Pid ! A;
          {failover = T, LocalTRef} ->
              Pid ! {T, TRef};
          T ->
              exit({timeout, LocalTRef, TPid} = T)
      end.
  
  %% send/2
  