anchor.diff:  
   timestamp() ->
       erlang:monotonic_time().
  +
  +formated_timestamp() ->
  +    format_timestamp(os:timestamp()).
  +
  +format_timestamp({_N1, _N2, N3} = TS) ->
  +    {_Date, Time}   = calendar:now_to_local_time(TS),
  +    {Hour, Min, Sec} = Time,
  +    FormatTS = io_lib:format("~.2.0w:~.2.0w:~.2.0w.~.3.0w",
  +                             [Hour, Min, Sec, N3 div 1000]),  
  +    lists:flatten(FormatTS).
  +
  +p(F) ->
  +    p(F, []).
  +
  +p(F, A) ->
  +    io:format("~s ~p " ++ F ++ "~n", [formated_timestamp(), self() | A]).
  +
  +
  
positive.code:        xfer_stream_min, peeloff_active_once,
         peeloff_active_true, peeloff_active_n, buffers,
         names_unihoming_ipv4, names_unihoming_ipv6,
         names_multihoming_ipv4, names_multihoming_ipv6]}].
  
  init_per_suite(_Config) ->
      case gen_sctp:open() of
  
negative.code:     peeloff_active_once/1, peeloff_active_true/1, peeloff_active_n/1,
      buffers/1,
      names_unihoming_ipv4/1, names_unihoming_ipv6/1,
      names_multihoming_ipv4/1, names_multihoming_ipv6/1,
      recv_close/1]).
  
  suite() ->
      [{ct_hooks,[ts_install_cth]},
  