ifdef tls version constants

TLS1_3_VERSION is not defined on older OpenSSL variants.
savonet · Jun 21, 2020 · 5cbeba7 · 5cbeba7
1 parent 6b75fac
commit 5cbeba7
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/src/ssl_stubs.c b/src/ssl_stubs.c
@@ -861,25 +861,35 @@ CAMLprim value ocaml_ssl_version(value socket)
   caml_leave_blocking_section();
 
   switch(version) {
+#ifdef SSL_version
     case SSL3_VERSION:
       ret = 1;
       break;
+#endif
 
+#ifdef TLS1_VERSION
     case TLS1_VERSION:
       ret = 2;
       break;
+#endif
 
+#ifdef TLS1_1_VERSION
     case TLS1_1_VERSION:
       ret = 3;
       break;
+#endif
 
+#ifdef TLS1_2_VERSION
     case TLS1_2_VERSION:
       ret = 4;
       break;
+#endif
 
+#ifdef TLS1_3_VERSION
     case TLS1_3_VERSION:
       ret = 5;
       break;
+#endif
 
     default:
       caml_failwith("Ssl.version");