Tcl Source Code

Artifact [f559e31528]
Login

Artifact f559e31528628d5dee87ceab102de3774446fdd2:

Attachment "eof.patch" to ticket [c31ca233ca] added by dgp 2014-07-02 19:57:02.
? Makefile
? bio
? config.log
? config.status
? eof.patch
? pkgIndex.tcl
? tls.patch
Index: tlsIO.c
===================================================================
RCS file: /cvsroot/tls/tls/tlsIO.c,v
retrieving revision 1.16
diff -u -r1.16 tlsIO.c
--- tlsIO.c	22 Jun 2007 21:20:38 -0000	1.16
+++ tlsIO.c	2 Jul 2014 19:56:21 -0000
@@ -900,6 +900,9 @@
 		    continue;
 		}
 	    } else if (err == 0) {
+		if (Tcl_Eof(statePtr->self)) {
+		    return 0;
+		}
 		dprintf(stderr,"CR! ");
 		*errorCodePtr = ECONNRESET;
 		return -1;