1 To: [email protected] |
|
2 Subject: Patch 7.2.187 |
|
3 Fcc: outbox |
|
4 From: Bram Moolenaar <[email protected]> |
|
5 Mime-Version: 1.0 |
|
6 Content-Type: text/plain; charset=UTF-8 |
|
7 Content-Transfer-Encoding: 8bit |
|
8 ------------ |
|
9 |
|
10 Patch 7.2.187 (after 7.2.186) |
|
11 Problem: Doesn't build with older versions of TCL. (Yongwei Wu) |
|
12 Solution: Add #ifdefs. (Dominique Pelle) |
|
13 Files: src/if_tcl.c |
|
14 |
|
15 |
|
16 *** ../vim-7.2.186/src/if_tcl.c 2009-05-22 21:07:45.000000000 +0200 |
|
17 --- src/if_tcl.c 2009-05-23 14:23:51.000000000 +0200 |
|
18 *************** |
|
19 *** 161,167 **** |
|
20 # endif |
|
21 |
|
22 /* |
|
23 ! * Declare HANDLE for perl.dll and function pointers. |
|
24 */ |
|
25 static HANDLE hTclLib = NULL; |
|
26 Tcl_Interp* (*dll_Tcl_CreateInterp)(); |
|
27 --- 161,167 ---- |
|
28 # endif |
|
29 |
|
30 /* |
|
31 ! * Declare HANDLE for tcl.dll and function pointers. |
|
32 */ |
|
33 static HANDLE hTclLib = NULL; |
|
34 Tcl_Interp* (*dll_Tcl_CreateInterp)(); |
|
35 *************** |
|
36 *** 182,188 **** |
|
37 * Make all runtime-links of tcl. |
|
38 * |
|
39 * 1. Get module handle using LoadLibraryEx. |
|
40 ! * 2. Get pointer to perl function by GetProcAddress. |
|
41 * 3. Repeat 2, until get all functions will be used. |
|
42 * |
|
43 * Parameter 'libname' provides name of DLL. |
|
44 --- 182,188 ---- |
|
45 * Make all runtime-links of tcl. |
|
46 * |
|
47 * 1. Get module handle using LoadLibraryEx. |
|
48 ! * 2. Get pointer to tcl function by GetProcAddress. |
|
49 * 3. Repeat 2, until get all functions will be used. |
|
50 * |
|
51 * Parameter 'libname' provides name of DLL. |
|
52 *************** |
|
53 *** 1670,1692 **** |
|
54 |
|
55 static Tcl_ChannelType channel_type = |
|
56 { |
|
57 ! "vimmessage", |
|
58 ! NULL, /* blockmode */ |
|
59 ! channel_close, |
|
60 ! channel_input, |
|
61 ! channel_output, |
|
62 ! NULL, /* seek */ |
|
63 ! NULL, /* set option */ |
|
64 ! NULL, /* get option */ |
|
65 ! channel_watch, |
|
66 ! channel_gethandle, |
|
67 ! NULL, |
|
68 ! NULL, |
|
69 ! NULL, |
|
70 ! NULL, |
|
71 ! NULL, |
|
72 ! NULL, |
|
73 ! NULL |
|
74 }; |
|
75 |
|
76 /********************************** |
|
77 --- 1670,1700 ---- |
|
78 |
|
79 static Tcl_ChannelType channel_type = |
|
80 { |
|
81 ! "vimmessage", /* typeName */ |
|
82 ! NULL, /* version */ |
|
83 ! channel_close, /* closeProc */ |
|
84 ! channel_input, /* inputProc */ |
|
85 ! channel_output, /* outputProc */ |
|
86 ! NULL, /* seekProc */ |
|
87 ! NULL, /* setOptionProc */ |
|
88 ! NULL, /* getOptionProc */ |
|
89 ! channel_watch, /* watchProc */ |
|
90 ! channel_gethandle, /* getHandleProc */ |
|
91 ! NULL, /* close2Proc */ |
|
92 ! NULL, /* blockModeProc */ |
|
93 ! #ifdef TCL_CHANNEL_VERSION_2 |
|
94 ! NULL, /* flushProc */ |
|
95 ! NULL, /* handlerProc */ |
|
96 ! #endif |
|
97 ! #ifdef TCL_CHANNEL_VERSION_3 |
|
98 ! NULL, /* wideSeekProc */ |
|
99 ! #endif |
|
100 ! #ifdef TCL_CHANNEL_VERSION_4 |
|
101 ! NULL, /* threadActionProc */ |
|
102 ! #endif |
|
103 ! #ifdef TCL_CHANNEL_VERSION_5 |
|
104 ! NULL /* truncateProc */ |
|
105 ! #endif |
|
106 }; |
|
107 |
|
108 /********************************** |
|
109 *** ../vim-7.2.186/src/version.c 2009-05-22 21:07:45.000000000 +0200 |
|
110 --- src/version.c 2009-05-23 14:25:04.000000000 +0200 |
|
111 *************** |
|
112 *** 678,679 **** |
|
113 --- 678,681 ---- |
|
114 { /* Add new patch number below this line */ |
|
115 + /**/ |
|
116 + 187, |
|
117 /**/ |
|
118 |
|
119 -- |
|
120 Friends? I have lots of friends! In fact, I have every episode ever made. |
|
121 |
|
122 /// Bram Moolenaar -- [email protected] -- http://www.Moolenaar.net \\\ |
|
123 /// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\ |
|
124 \\\ download, build and distribute -- http://www.A-A-P.org /// |
|
125 \\\ help me help AIDS victims -- http://ICCF-Holland.org /// |
|