Index: tlsBIO.c
==================================================================
--- tlsBIO.c
+++ tlsBIO.c
@@ -281,13 +281,29 @@
 		case BIO_CTRL_FLUSH:
 			dprintf("Got BIO_CTRL_FLUSH");
 			ret = ((chan) && (Tcl_WriteRaw(chan, "", 0) >= 0) ? 1 : -1);
 			dprintf("BIO_CTRL_FLUSH returning value %li", ret);
 			break;
+		case BIO_CTRL_PUSH:
+			dprintf("Got BIO_CTRL_PUSH");
+			ret = 0;
+			break;
+		case BIO_CTRL_POP:
+			dprintf("Got BIO_CTRL_POP");
+			ret = 0;
+			break;
+		case BIO_CTRL_SET:
+			dprintf("Got BIO_CTRL_SET");
+			ret = 0;
+			break;
+		case BIO_CTRL_GET :
+			dprintf("Got BIO_CTRL_GET ");
+			ret = 0;
+			break;
 		default:
 			dprintf("Got unknown control command (%i)", cmd);
-			ret = -2;
+			ret = 0;
 			break;
 	}
 
 	return(ret);
 }