[packages/vim.git] / 7.2.186

To: vim-dev@vim.org
Subject: Patch 7.2.186
Fcc: outbox
From: Bram Moolenaar <Bram@moolenaar.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
------------

Patch 7.2.186
Problem:    Some more compiler warnings when using gcc -Wextra.
Solution:   Now with the intended if_tcl.c changes.
Files:	    src/if_tcl.c


*** ../vim-7.2.185/src/if_tcl.c	2007-05-10 20:55:34.000000000 +0200
--- src/if_tcl.c	2009-05-22 15:29:53.000000000 +0200
***************
*** 290,299 ****
   */
  #define TCL_EXIT	5
  
- /* ARGSUSED */
      static int
  exitcmd(dummy, interp, objc, objv)
!     ClientData dummy;
      Tcl_Interp *interp;
      int objc;
      Tcl_Obj *CONST objv[];
--- 290,298 ----
   */
  #define TCL_EXIT	5
  
      static int
  exitcmd(dummy, interp, objc, objv)
!     ClientData dummy UNUSED;
      Tcl_Interp *interp;
      int objc;
      Tcl_Obj *CONST objv[];
***************
*** 315,324 ****
      return TCL_ERROR;
  }
  
- /* ARGSUSED */
      static int
  catchcmd(dummy, interp, objc, objv)
!     ClientData	dummy;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
--- 314,322 ----
      return TCL_ERROR;
  }
  
      static int
  catchcmd(dummy, interp, objc, objv)
!     ClientData	dummy UNUSED;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
***************
*** 356,365 ****
  /*
   *  "::vim::beep" - what Vi[m] does best :-)
   */
- /* ARGSUSED */
      static int
  beepcmd(dummy, interp, objc, objv)
!     ClientData dummy;
      Tcl_Interp *interp;
      int objc;
      Tcl_Obj *CONST objv[];
--- 354,362 ----
  /*
   *  "::vim::beep" - what Vi[m] does best :-)
   */
      static int
  beepcmd(dummy, interp, objc, objv)
!     ClientData dummy UNUSED;
      Tcl_Interp *interp;
      int objc;
      Tcl_Obj *CONST objv[];
***************
*** 378,387 ****
   *  "::vim::buffer {N}" - create buffer command for buffer N.
   *  "::vim::buffer new" - create a new buffer (not implemented)
   */
- /* ARGSUSED */
      static int
  buffercmd(dummy, interp, objc, objv)
!     ClientData dummy;
      Tcl_Interp *interp;
      int objc;
      Tcl_Obj *CONST objv[];
--- 375,383 ----
   *  "::vim::buffer {N}" - create buffer command for buffer N.
   *  "::vim::buffer new" - create a new buffer (not implemented)
   */
      static int
  buffercmd(dummy, interp, objc, objv)
!     ClientData dummy UNUSED;
      Tcl_Interp *interp;
      int objc;
      Tcl_Obj *CONST objv[];
***************
*** 475,484 ****
  /*
   * "::vim::window list" - create list of window commands.
   */
- /* ARGSUSED */
      static int
  windowcmd(dummy, interp, objc, objv)
!     ClientData	dummy;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
--- 471,479 ----
  /*
   * "::vim::window list" - create list of window commands.
   */
      static int
  windowcmd(dummy, interp, objc, objv)
!     ClientData	dummy UNUSED;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
***************
*** 1130,1139 ****
  }
  
  
- /* ARGSUSED */
      static int
  commandcmd(dummy, interp, objc, objv)
!     ClientData	dummy;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
--- 1125,1133 ----
  }
  
  
      static int
  commandcmd(dummy, interp, objc, objv)
!     ClientData	dummy UNUSED;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
***************
*** 1145,1154 ****
      return err;
  }
  
- /* ARGSUSED */
      static int
  optioncmd(dummy, interp, objc, objv)
!     ClientData	dummy;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
--- 1139,1147 ----
      return err;
  }
  
      static int
  optioncmd(dummy, interp, objc, objv)
!     ClientData	dummy UNUSED;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
***************
*** 1160,1169 ****
      return err;
  }
  
- /* ARGSUSED */
      static int
  exprcmd(dummy, interp, objc, objv)
!     ClientData	dummy;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
--- 1153,1161 ----
      return err;
  }
  
      static int
  exprcmd(dummy, interp, objc, objv)
!     ClientData	dummy UNUSED;
      Tcl_Interp	*interp;
      int		objc;
      Tcl_Obj	*CONST objv[];
***************
*** 1584,1594 ****
      I/O Channel
  ********************************************/
  
- /* ARGSUSED */
      static int
  channel_close(instance, interp)
      ClientData	instance;
!     Tcl_Interp	*interp;
  {
      int		err = 0;
  
--- 1576,1585 ----
      I/O Channel
  ********************************************/
  
      static int
  channel_close(instance, interp)
      ClientData	instance;
!     Tcl_Interp	*interp UNUSED;
  {
      int		err = 0;
  
***************
*** 1602,1613 ****
      return err;
  }
  
- /* ARGSUSED */
      static int
  channel_input(instance, buf, bufsiz, errptr)
!     ClientData	instance;
!     char	*buf;
!     int		bufsiz;
      int		*errptr;
  {
  
--- 1593,1603 ----
      return err;
  }
  
      static int
  channel_input(instance, buf, bufsiz, errptr)
!     ClientData	instance UNUSED;
!     char	*buf UNUSED;
!     int		bufsiz UNUSED;
      int		*errptr;
  {
  
***************
*** 1659,1679 ****
      return result;
  }
  
- /* ARGSUSED */
      static void
  channel_watch(instance, mask)
!     ClientData	instance;
!     int		mask;
  {
      Tcl_SetErrno(EINVAL);
  }
  
- /* ARGSUSED */
      static int
  channel_gethandle(instance, direction, handleptr)
!     ClientData	instance;
!     int		direction;
!     ClientData	*handleptr;
  {
      Tcl_SetErrno(EINVAL);
      return EINVAL;
--- 1649,1667 ----
      return result;
  }
  
      static void
  channel_watch(instance, mask)
!     ClientData	instance UNUSED;
!     int		mask UNUSED;
  {
      Tcl_SetErrno(EINVAL);
  }
  
      static int
  channel_gethandle(instance, direction, handleptr)
!     ClientData	instance UNUSED;
!     int		direction UNUSED;
!     ClientData	*handleptr UNUSED;
  {
      Tcl_SetErrno(EINVAL);
      return EINVAL;
***************
*** 1691,1697 ****
      NULL,   /* set option */
      NULL,   /* get option */
      channel_watch,
!     channel_gethandle
  };
  
  /**********************************
--- 1679,1692 ----
      NULL,   /* set option */
      NULL,   /* get option */
      channel_watch,
!     channel_gethandle,
!     NULL,
!     NULL,
!     NULL,
!     NULL,
!     NULL,
!     NULL,
!     NULL
  };
  
  /**********************************
*** ../vim-7.2.185/src/version.c	2009-05-22 18:20:23.000000000 +0200
--- src/version.c	2009-05-22 21:07:21.000000000 +0200
***************
*** 678,679 ****
--- 678,681 ----
  {   /* Add new patch number below this line */
+ /**/
+     186,
  /**/

-- 
ARTHUR: Old woman!
DENNIS: Man!
ARTHUR: Man.  I'm sorry.  Old man, What knight live in that castle over there?
DENNIS: I'm thirty-seven.
                 "Monty Python and the Holy Grail" PYTHON (MONTY) PICTURES LTD

 /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
\\\        download, build and distribute -- http://www.A-A-P.org        ///
 \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///
Commit	Line	Data
b5ccbaa1 ER	1	To: vim-dev@vim.org
	2	Subject: Patch 7.2.186
	3	Fcc: outbox
	4	From: Bram Moolenaar <Bram@moolenaar.net>
	5	Mime-Version: 1.0
	6	Content-Type: text/plain; charset=UTF-8
	7	Content-Transfer-Encoding: 8bit
	8	------------
	9
	10	Patch 7.2.186
	11	Problem: Some more compiler warnings when using gcc -Wextra.
	12	Solution: Now with the intended if_tcl.c changes.
	13	Files: src/if_tcl.c
	14
	15
	16	*** ../vim-7.2.185/src/if_tcl.c 2007-05-10 20:55:34.000000000 +0200
	17	--- src/if_tcl.c 2009-05-22 15:29:53.000000000 +0200
	18	***************
	19	* 290,299 **
	20	*/
	21	#define TCL_EXIT 5
	22
	23	- /* ARGSUSED */
	24	static int
	25	exitcmd(dummy, interp, objc, objv)
	26	! ClientData dummy;
	27	Tcl_Interp *interp;
	28	int objc;
	29	Tcl_Obj *CONST objv[];
	30	--- 290,298 ----
	31	*/
	32	#define TCL_EXIT 5
	33
	34	static int
	35	exitcmd(dummy, interp, objc, objv)
	36	! ClientData dummy UNUSED;
	37	Tcl_Interp *interp;
	38	int objc;
	39	Tcl_Obj *CONST objv[];
	40	***************
	41	* 315,324 **
	42	return TCL_ERROR;
	43	}
	44
	45	- /* ARGSUSED */
	46	static int
	47	catchcmd(dummy, interp, objc, objv)
	48	! ClientData dummy;
	49	Tcl_Interp *interp;
	50	int objc;
	51	Tcl_Obj *CONST objv[];
	52	--- 314,322 ----
	53	return TCL_ERROR;
	54	}
	55
	56	static int
	57	catchcmd(dummy, interp, objc, objv)
	58	! ClientData dummy UNUSED;
	59	Tcl_Interp *interp;
	60	int objc;
	61	Tcl_Obj *CONST objv[];
	62	***************
	63	* 356,365 **
	64	/*
65	* "::vim::beep" - what Vi[m] does best :-)
66	*/
67	- /* ARGSUSED */
68	static int
69	beepcmd(dummy, interp, objc, objv)
70	! ClientData dummy;
71	Tcl_Interp *interp;
72	int objc;
73	Tcl_Obj *CONST objv[];
74	--- 354,362 ----
75	/*
76	* "::vim::beep" - what Vi[m] does best :-)
77	*/
78	static int
79	beepcmd(dummy, interp, objc, objv)
80	! ClientData dummy UNUSED;
81	Tcl_Interp *interp;
82	int objc;
83	Tcl_Obj *CONST objv[];
84	***************
85	* 378,387 **
86	* "::vim::buffer {N}" - create buffer command for buffer N.
87	* "::vim::buffer new" - create a new buffer (not implemented)
88	*/
89	- /* ARGSUSED */
90	static int
91	buffercmd(dummy, interp, objc, objv)
92	! ClientData dummy;
93	Tcl_Interp *interp;
94	int objc;
95	Tcl_Obj *CONST objv[];
96	--- 375,383 ----
97	* "::vim::buffer {N}" - create buffer command for buffer N.
98	* "::vim::buffer new" - create a new buffer (not implemented)
99	*/
100	static int
101	buffercmd(dummy, interp, objc, objv)
102	! ClientData dummy UNUSED;
103	Tcl_Interp *interp;
104	int objc;
105	Tcl_Obj *CONST objv[];
106	***************
107	* 475,484 **
108	/*
109	* "::vim::window list" - create list of window commands.
110	*/
111	- /* ARGSUSED */
112	static int
113	windowcmd(dummy, interp, objc, objv)
114	! ClientData dummy;
115	Tcl_Interp *interp;
116	int objc;
117	Tcl_Obj *CONST objv[];
118	--- 471,479 ----
119	/*
120	* "::vim::window list" - create list of window commands.
121	*/
122	static int
123	windowcmd(dummy, interp, objc, objv)
124	! ClientData dummy UNUSED;
125	Tcl_Interp *interp;
126	int objc;
127	Tcl_Obj *CONST objv[];
128	***************
129	* 1130,1139 **
130	}
131
132
133	- /* ARGSUSED */
134	static int
135	commandcmd(dummy, interp, objc, objv)
136	! ClientData dummy;
137	Tcl_Interp *interp;
138	int objc;
139	Tcl_Obj *CONST objv[];
140	--- 1125,1133 ----
141	}
142
143
144	static int
145	commandcmd(dummy, interp, objc, objv)
146	! ClientData dummy UNUSED;
147	Tcl_Interp *interp;
148	int objc;
149	Tcl_Obj *CONST objv[];
150	***************
151	* 1145,1154 **
152	return err;
153	}
154
155	- /* ARGSUSED */
156	static int
157	optioncmd(dummy, interp, objc, objv)
158	! ClientData dummy;
159	Tcl_Interp *interp;
160	int objc;
161	Tcl_Obj *CONST objv[];
162	--- 1139,1147 ----
163	return err;
164	}
165
166	static int
167	optioncmd(dummy, interp, objc, objv)
168	! ClientData dummy UNUSED;
169	Tcl_Interp *interp;
170	int objc;
171	Tcl_Obj *CONST objv[];
172	***************
173	* 1160,1169 **
174	return err;
175	}
176
177	- /* ARGSUSED */
178	static int
179	exprcmd(dummy, interp, objc, objv)
180	! ClientData dummy;
181	Tcl_Interp *interp;
182	int objc;
183	Tcl_Obj *CONST objv[];
184	--- 1153,1161 ----
185	return err;
186	}
187
188	static int
189	exprcmd(dummy, interp, objc, objv)
190	! ClientData dummy UNUSED;
191	Tcl_Interp *interp;
192	int objc;
193	Tcl_Obj *CONST objv[];
194	***************
195	* 1584,1594 **
196	I/O Channel
197	********************************************/
198
199	- /* ARGSUSED */
200	static int
201	channel_close(instance, interp)
202	ClientData instance;
203	! Tcl_Interp *interp;
204	{
205	int err = 0;
206
207	--- 1576,1585 ----
208	I/O Channel
209	********************************************/
210
211	static int
212	channel_close(instance, interp)
213	ClientData instance;
214	! Tcl_Interp *interp UNUSED;
215	{
216	int err = 0;
217
218	***************
219	* 1602,1613 **
220	return err;
221	}
222
223	- /* ARGSUSED */
224	static int
225	channel_input(instance, buf, bufsiz, errptr)
226	! ClientData instance;
227	! char *buf;
228	! int bufsiz;
229	int *errptr;
230	{
231
232	--- 1593,1603 ----
233	return err;
234	}
235
236	static int
237	channel_input(instance, buf, bufsiz, errptr)
238	! ClientData instance UNUSED;
239	! char *buf UNUSED;
240	! int bufsiz UNUSED;
241	int *errptr;
242	{
243
244	***************
245	* 1659,1679 **
246	return result;
247	}
248
249	- /* ARGSUSED */
250	static void
251	channel_watch(instance, mask)
252	! ClientData instance;
253	! int mask;
254	{
255	Tcl_SetErrno(EINVAL);
256	}
257
258	- /* ARGSUSED */
259	static int
260	channel_gethandle(instance, direction, handleptr)
261	! ClientData instance;
262	! int direction;
263	! ClientData *handleptr;
264	{
265	Tcl_SetErrno(EINVAL);
266	return EINVAL;
267	--- 1649,1667 ----
268	return result;
269	}
270
271	static void
272	channel_watch(instance, mask)
273	! ClientData instance UNUSED;
274	! int mask UNUSED;
275	{
276	Tcl_SetErrno(EINVAL);
277	}
278
279	static int
280	channel_gethandle(instance, direction, handleptr)
281	! ClientData instance UNUSED;
282	! int direction UNUSED;
283	! ClientData *handleptr UNUSED;
284	{
285	Tcl_SetErrno(EINVAL);
286	return EINVAL;
287	***************
288	* 1691,1697 **
289	NULL, /* set option */
290	NULL, /* get option */
291	channel_watch,
292	! channel_gethandle
293	};
294
295	/**********************************
296	--- 1679,1692 ----
297	NULL, /* set option */
298	NULL, /* get option */
299	channel_watch,
300	! channel_gethandle,
301	! NULL,
302	! NULL,
303	! NULL,
304	! NULL,
305	! NULL,
306	! NULL,
307	! NULL
308	};
309
310	/**********************************
311	*** ../vim-7.2.185/src/version.c 2009-05-22 18:20:23.000000000 +0200
312	--- src/version.c 2009-05-22 21:07:21.000000000 +0200
313	***************
314	* 678,679 **
315	--- 678,681 ----
316	{ /* Add new patch number below this line */
317	+ /**/
318	+ 186,
319	/**/
320
321	--
322	ARTHUR: Old woman!
323	DENNIS: Man!
324	ARTHUR: Man. I'm sorry. Old man, What knight live in that castle over there?
325	DENNIS: I'm thirty-seven.
326	"Monty Python and the Holy Grail" PYTHON (MONTY) PICTURES LTD
327
328	/// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net \\\
329	/// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
330	\\\ download, build and distribute -- http://www.A-A-P.org ///
331	\\\ help me help AIDS victims -- http://ICCF-Holland.org ///