anchor.diff:  	    end,
   	    case {gb_get({assoc_change,AssocId}, State),St} of
   		{[{_,{Addr,Port,#sctp_assoc_change{state=comm_up}}}|_],_}
  -		    when St =:= addr_available;
  -			 St =:= addr_confirmed -> ok;
  +		  when St =:= addr_available;
  +		       St =:= addr_confirmed -> ok;
   		{[],addr_confirmed} -> ok
   	    end,
   	    Key = {paddr_change,AssocId},
  
positive.code: 
  socket_history({State,Flush}) ->
      {lists:keysort(
        2,
        lists:flatten(
  	[[{Key,Val} || Val <- Vals]
  	 || {Key,Vals} <- gb_trees:to_list(State)])),
       Flush}.
  
  s_handler(Socket) ->
  
negative.code:     ?line {ok,Sb} = gen_sctp:open([{active,true}]),
      ?line {ok,Pb} = inet:port(Sb),
      ?line ok = gen_sctp:listen(Sb, true),
  
      ?line {ok,Sa} = gen_sctp:open([{active,true}]),
      ?line {ok,Pa} = inet:port(Sa),
      ?line ok = gen_sctp:connect_init(Sa, Loopback, Pb, []),
  