anchor.diff:      is_result(RC, E, Dict0)
           orelse x({invalid_error_bit, RC}, answer, [Dir, Pkt]),
   
  -    incr(TPid, {diameter_codec:msg_id(Hdr), Dir, Ctr}).
  +    incr(TPid, {Id, Dir, Ctr}).
   
   %% No E-bit: can't be 3xxx.
   is_result(RC, false, _Dict0) ->
  
positive.code:     Pkt = encode(Dict,
                   reset(make_answer_packet(Msg, ReqPkt), Dict, Dict0),
                   Fs),
      incr_A(send, Pkt, Dict, TPid, Dict0),  %% count outgoing result codes
      send(TPid, Pkt).
  
  %% reset/3
  
negative.code: incr_A(_, #diameter_packet{msg = undefined = No}, _, _, _) ->
      No;
  
  %% Incoming or outgoing. Outgoing with encode errors never gets here
  %% since encode fails.
  incr_A(Dir, Pkt, Dict, TPid, Dict0) ->
      #diameter_packet{header = #diameter_header{is_error = E}
                              = Hdr,
                       msg = Msg,
                       errors = Es}
          = Pkt,
  
      Id = diameter_codec:msg_id(Hdr),
  
      %% Count incoming decode errors.
      recv /= Dir orelse [] == Es orelse incr(TPid, {Id, Dir, error}),
  
      %% Exit on a missing result code.
      T = rc_counter(Dict, Msg),
  