anchor.diff:  buffers(suite) ->
       [];
   buffers(Config) when is_list(Config) ->
  -    ?line Limit = 8192,
  -    ?line Data = mk_data(Limit),
  +    ?line Limit = 4096,
       ?line Addr = {127,0,0,1},
       ?line Stream = 1,
  -    ?line Timeout = 1333,
  +    ?line Timeout = 3333,
       ?line S1 = socket_open([{ip,Addr}], Timeout),
       ?line ?LOGVAR(S1),
       ?line P1 = socket_call(S1, get_port),
  
positive.code:     ?line socket_close_verbose(S2),
      ?line
  	receive
  	    {S3,{Addr,P2,#sctp_shutdown_event{assoc_id=S3Ai}}} -> ok
  	after Timeout ->
  		socket_bailout([S3])
  	end,
  
negative.code: 		    recv_event(log_ok(gen_sctp:recv(Sb, infinity))),
  		{OS,IS,AI}
  	end,
      ?line ?LOGVAR(SbAssocId),
      ?line SaOutboundStreams = SbInboundStreams,
      ?line ?LOGVAR(SaOutboundStreams),
      ?line SbOutboundStreams = SaInboundStreams,
      ?line ?LOGVAR(SbOutboundStreams),
      ?line ok = gen_sctp:send(Sa, SaAssocId, 0, Data),
      ?line case gen_sctp:recv(Sb, infinity) of
  	      {ok,{Loopback,
  