Index: tlsIO.c
==================================================================
--- tlsIO.c
+++ tlsIO.c
@@ -799,10 +799,12 @@
 		bioShouldRetry = 0;
 		if (err <= 0) {
 			if (rc == SSL_ERROR_WANT_CONNECT || rc == SSL_ERROR_WANT_ACCEPT || rc == SSL_ERROR_WANT_READ || rc == SSL_ERROR_WANT_WRITE) {
 				bioShouldRetry = 1;
 			} else if (BIO_should_retry(statePtr->bio)) {
+				bioShouldRetry = 1;
+			} else if (rc == SSL_ERROR_SYSCALL && Tcl_GetErrno() == EAGAIN) {
 				bioShouldRetry = 1;
 			}
 		} else {
 			if (!SSL_is_init_finished(statePtr->ssl)) {
 				bioShouldRetry = 1;