updated for version 7.2-187

src/if_tcl.c

@@ -161,7 +161,7 @@ typedef int HANDLE;
 # endif
 
 /*
- * Declare HANDLE for perl.dll and function pointers.
+ * Declare HANDLE for tcl.dll and function pointers.
  */
 static HANDLE hTclLib = NULL;
 Tcl_Interp* (*dll_Tcl_CreateInterp)();
@@ -182,7 +182,7 @@ static struct {
  * Make all runtime-links of tcl.
  *
  * 1. Get module handle using LoadLibraryEx.
- * 2. Get pointer to perl function by GetProcAddress.
+ * 2. Get pointer to tcl function by GetProcAddress.
  * 3. Repeat 2, until get all functions will be used.
  *
  * Parameter 'libname' provides name of DLL.
@@ -1670,23 +1670,31 @@ channel_gethandle(instance, direction, handleptr)
 
 static Tcl_ChannelType channel_type =
 {
-    "vimmessage",
+    "vimmessage",	/* typeName */
-    NULL,   /* blockmode */
+    NULL,		/* version */
-    channel_close,
+    channel_close,	/* closeProc */
-    channel_input,
+    channel_input,	/* inputProc */
-    channel_output,
+    channel_output,	/* outputProc */
-    NULL,   /* seek */
+    NULL,		/* seekProc */
-    NULL,   /* set option */
+    NULL,		/* setOptionProc */
-    NULL,   /* get option */
+    NULL,		/* getOptionProc */
-    channel_watch,
+    channel_watch,	/* watchProc */
-    channel_gethandle,
+    channel_gethandle,	/* getHandleProc */
-    NULL,
+    NULL,		/* close2Proc */
-    NULL,
+    NULL,		/* blockModeProc */
-    NULL,
+#ifdef TCL_CHANNEL_VERSION_2
-    NULL,
+    NULL,		/* flushProc */
-    NULL,
+    NULL,		/* handlerProc */
-    NULL,
+#endif
-    NULL
+#ifdef TCL_CHANNEL_VERSION_3
+    NULL,		/* wideSeekProc */
+#endif
+#ifdef TCL_CHANNEL_VERSION_4
+    NULL,		/* threadActionProc */
+#endif
+#ifdef TCL_CHANNEL_VERSION_5
+    NULL		/* truncateProc */
+#endif
 };
 
 /**********************************

src/version.c

@@ -676,6 +676,8 @@ static char *(features[]) =
 
 static int included_patches[] =
 {   /* Add new patch number below this line */
+/**/
+    187,
 /**/
     186,
 /**/