anchor.diff:  -export([init_connection_handler/3,	   % proc_lib:spawn needs this
   	 init_ssh_record/3,		   % Export of this internal function
   					   % intended for low-level protocol test suites
  -	 renegotiate/1, renegotiate_data/1 % Export intended for test cases
  +	 renegotiate/1, renegotiate_data/1, alg/1 % Export intended for test cases
   	]).
   
   %%====================================================================
  
positive.code:     {next_state, {kexinit,Role,renegotiate}, D#data{ssh_params = Ssh,
  						    key_exchange_init_msg = KeyInitMsg}};
  
  handle_event(cast, renegotiate, _, _) ->
      %% Already in key-exchange so safe to ignore
      timer:apply_after(?REKEY_TIMOUT, gen_statem, cast, [self(), renegotiate]), % FIXME: not here in original
  
negative.code: renegotiate_data(ConnectionHandler) ->
      cast(ConnectionHandler, data_size).
  
  %%--------------------------------------------------------------------
  alg(ConnectionHandler) ->
      call(ConnectionHandler, get_alg).
  
  %%====================================================================
  %% Internal process state
  