anchor.diff:                                        = #diameter_caps{host_ip_address
                                                          = Addrs}}).
   
  -%% The term we register after open a listening port with gen_tcp.
  +%% The term we register after open a listening port with gen_{tcp,sctp}.
   -define(TEST_LISTENER(Ref, PortNr),
           {?MODULE, listen, Ref, PortNr}).
   
  
positive.code: %% gen_accept/2
  
  gen_accept(sctp, Sock) ->
      Assoc = ?RECV(?SCTP(Sock, {_, #sctp_assoc_change{state = comm_up,
                                                       outbound_streams = O,
                                                       inbound_streams = I,
                                                       assoc_id = A}}),
                    {O, I, A}),
      putr(assoc, Assoc),
      {ok, Sock};
  gen_accept(tcp, LSock) ->
      gen_tcp:accept(LSock).
  
negative.code: %% ===========================================================================
  
  suite() ->
      [{timetrap, {seconds, 15}}].
  
  all() ->
      [start,
  