anchor.diff:  %% Any other message with a header and no length errors: send to the
   %% parent.
   recv1(Name, Pkt, #state{}) ->
  -    throw({?MODULE, Name, Pkt}).
  +    {recv, Name, Pkt}.
   
   %% recv/3
   
  
positive.code: 
  %% Incoming message from the transport.
  transition({diameter, {recv, MsgT}}, S) ->
      incoming(MsgT, S);
  
  %% Timeout when still in the same state ...
  transition({timeout = T, PS}, #state{state = PS}) ->
  
negative.code:     diameter_codec:encode(Dict, #diameter_packet{header = Hdr,
                                                   msg = Rec}).
  
  %% incoming/3
  
  incoming({recv, Name, Pkt}, NPid, #state{parent = Pid} = S) ->
      Pid ! {recv, self(), get_route(Pkt), Name, Pkt, NPid},
      rcv(Name, Pkt, S);
  
  incoming(T, false, _) ->
      T;
  
  incoming(T, NPid, _) ->
      NPid ! {diameter, discard},
      T.
  
  %% msg/1
  
  msg({_,_} = T) ->
      T;
  
  msg(Msg) ->
      {Msg, false}.
  
  %% recv/2
  
  