anchor.diff:      [];
   app(Config) when is_list(Config) ->
       ok = test_server:app_test(ssl).
  -
  +%%--------------------------------------------------------------------
  +alerts(doc) ->
  +    "Test ssl_alert:alert_txt/1";
  +alerts(suite) ->
  +    [];
  +alerts(Config) when is_list(Config) ->
  +    Descriptions = [?CLOSE_NOTIFY, ?UNEXPECTED_MESSAGE, ?BAD_RECORD_MAC,
  +		    ?DECRYPTION_FAILED, ?RECORD_OVERFLOW, ?DECOMPRESSION_FAILURE,
  +		    ?HANDSHAKE_FAILURE, ?BAD_CERTIFICATE, ?UNSUPPORTED_CERTIFICATE,
  +		    ?CERTIFICATE_REVOKED,?CERTIFICATE_EXPIRED, ?CERTIFICATE_UNKNOWN,
  +		    ?ILLEGAL_PARAMETER, ?UNKNOWN_CA, ?ACCESS_DENIED, ?DECODE_ERROR,
  +		    ?DECRYPT_ERROR, ?EXPORT_RESTRICTION, ?PROTOCOL_VERSION, 
  +		    ?INSUFFICIENT_SECURITY, ?INTERNAL_ERROR, ?USER_CANCELED,
  +		    ?NO_RENEGOTIATION],
  +    Alerts = [?ALERT_REC(?WARNING, ?CLOSE_NOTIFY) | 
  +	      [?ALERT_REC(?FATAL, Desc) || Desc <- Descriptions]],
  +    lists:foreach(fun(Alert) ->
  +			case ssl_alert:alert_txt(Alert) of
  +			    Txt when is_list(Txt) ->
  +				ok;
  +			    Other ->
  +				test_server:fail({unexpected, Other})
  +			end 
  +		  end, Alerts).
  +%%--------------------------------------------------------------------
   connection_info(doc) -> 
       ["Test the API function ssl:connection_info/1"];
   connection_info(suite) -> 
  
positive.code:     ok = ssl:close(Listen),
      {error, closed} = ssl:shutdown(Listen, read_write).
  
  %%--------------------------------------------------------------------
  ciphers(doc) -> 
      [""];
         
  ciphers(suite) -> 
      [];
  
negative.code:      server_verify_client_once_active,
       server_verify_client_once_active_once,
       client_verify_none_passive,
       client_verify_none_active, client_verify_none_active_once,
       %session_cache_process_list, session_cache_process_mnesia,
       reuse_session, reuse_session_expired, server_does_not_want_to_reuse_session,
       client_renegotiate, server_renegotiate, client_renegotiate_reused_session,
       server_renegotiate_reused_session,
       client_no_wrap_sequence_number, server_no_wrap_sequence_number,
       extended_key_usage, validate_extensions_fun, no_authority_key_identifier, 
       invalid_signature_client, invalid_signature_server
      ].
  
  %% Test cases starts here.
  