anchor.diff:      false;
   resumable(IsResumable) ->
       IsResumable.
  +
  +reusable_options(#ssl_options{fail_if_no_peer_cert = true,
  +			   verify = verify_peer}, Session) ->
  +    (Session#session.peer_certificate =/= undefined);
  +reusable_options(_,_) ->
  +    true.
  
positive.code: 	[[Id, _]|_] -> Id
      end.
  
  is_resumable(_, _, false, _, _, _, _, _) ->
      {false, undefined};
  is_resumable(SuggestedSessionId, Port, true, ReuseFun, Cache,
  	     CacheCb, SecondLifeTime, OwnCert) ->
      case CacheCb:lookup(Cache, {Port, SuggestedSessionId}) of
  	#session{cipher_suite = CipherSuite,
  
negative.code: 
  server_id(Port, <<>>, _SslOpts, _Cert, _, _) ->
      {ssl_manager:new_session_id(Port), undefined};
  server_id(Port, SuggestedId, Options, Cert, Cache, CacheCb) ->
      LifeTime = case application:get_env(ssl, session_lifetime) of
  		   {ok, Time} when is_integer(Time) -> Time;
  		   _ -> ?'24H_in_sec'
  	       end,
      case is_resumable(SuggestedId, Port, Options,
  		      Cache, CacheCb, LifeTime, Cert)
      of
  	{true, Resumed} ->
  