anchor.diff:          {ok, StartState, D} ->
               process_flag(trap_exit, true),
               gen_statem:enter_loop(?MODULE,
  -                                  [], %%[{debug,[trace,log,statistics,debug]} || Role==server],
  +                                  [], %%[{debug,[trace,log,statistics,debug]} ], %% []
                                     StartState,
                                     D);
   
  
positive.code:     {keep_state_and_data, [{reply,From,Reply}]};
  
  handle_event({call,From}, {recv_window, ChannelId}, StateName, D) 
    when element(1,StateName) == connected ;
         element(1,StateName) == ext_info ->
      Reply = case ssh_channel:cache_lookup(cache(D), ChannelId) of
  		#channel{recv_window_size = WinSize,
  			 recv_packet_size = Packsize} ->
  
negative.code:     {keep_state_and_data, [{reply,From,Reply}]};
  
  handle_event({call,From}, {close, ChannelId}, StateName, D0) 
    when ?CONNECTED(StateName) ->
      case ssh_channel:cache_lookup(cache(D0), ChannelId) of
  	#channel{remote_id = Id} = Channel ->
  	    D1 = send_msg(ssh_connection:channel_close_msg(Id), D0),
  