anchor.diff:  %% Returns : ok
   %%--------------------------------------------------------------------
   test() ->
  -    %% handle_received_data2/2
  +    %% handle_received_data2(Data, Recv)
       %%--------------------------------------------------------------------
       EmptyRecv = #recv{},
   
  
positive.code: 	connection_closed ->
  	    gen_server:cast(Parent, {connection_closed, self()});
  	close ->
  	    ssl:close(State#state.socket),	%% Maybe not needed, but better safe than sorry
  	    gen_server:cast(Parent, {close, self()});
  	quit ->
  	    ssl:close(State#state.socket),
  
negative.code:     {error, parse_failed, _} =
  	(catch handle_received_data2(HRD_16_Data, EmptyRecv)),
  
      %% handle_received_data(Data, Recv, State)
      %% we can't test much of this function since it is not side-effect free
      %%--------------------------------------------------------------------
      %% minimal state
      HRD_State1 = #state{remote = {"192.0.2.1", 5060},
  			socketmodule = ssl
  		       },
      HDR_Data1 = list_to_binary("broken\n\n"),
      close = handle_received_data(HDR_Data1, EmptyRecv, HRD_State1),
  
      ok.
  