diff options
| author | Ingela Anderton Andin <[email protected]> | 2013-06-07 11:55:45 +0200 |
|---|---|---|
| committer | Ingela Anderton Andin <[email protected]> | 2013-06-07 15:41:48 +0200 |
| commit | 6607299aa3c0887a108f1fd792b79448dff576a4 (patch) | |
| tree | d3f132adf5872b93edbd3450cd695b279586f850 | |
| parent | b1da47eff2e41013d60dacebbdfa31ce60357d23 (diff) | |
| download | otp-6607299aa3c0887a108f1fd792b79448dff576a4.tar.gz otp-6607299aa3c0887a108f1fd792b79448dff576a4.tar.bz2 otp-6607299aa3c0887a108f1fd792b79448dff576a4.zip | |
ssl: Fix dialyzer warnings
| -rw-r--r-- | lib/ssl/src/ssl.erl | 4 | ||||
| -rw-r--r-- | lib/ssl/src/ssl_cipher.erl | 12 |
2 files changed, 9 insertions, 7 deletions
diff --git a/lib/ssl/src/ssl.erl b/lib/ssl/src/ssl.erl index 75c17b14db..0c1e47311d 100644 --- a/lib/ssl/src/ssl.erl +++ b/lib/ssl/src/ssl.erl @@ -214,8 +214,8 @@ prf(Socket, Secret, Label, Seed, WantedLength) -> clear_pem_cache() -> tls:clear_pem_cache(). -format_error(Reason) when is_list(Reason) -> - tls:format_error(Reason). +format_error(Error) -> + tls:format_error(Error). random_bytes(N) -> tls:random_bytes(N). diff --git a/lib/ssl/src/ssl_cipher.erl b/lib/ssl/src/ssl_cipher.erl index 898b421dff..ec5d793d65 100644 --- a/lib/ssl/src/ssl_cipher.erl +++ b/lib/ssl/src/ssl_cipher.erl @@ -1190,14 +1190,16 @@ hash_size(md5) -> 16; hash_size(sha) -> 20; -hash_size(sha224) -> - 28; +%% Uncomment when adding cipher suite that needs it +%% hash_size(sha224) -> +%% 28; hash_size(sha256) -> 32; hash_size(sha384) -> - 48; -hash_size(sha512) -> - 64. + 48. +%% Uncomment when adding cipher suite that needs it +%% hash_size(sha512) -> +%% 64. %% RFC 5246: 6.2.3.2. CBC Block Cipher %% |