kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

* ext/tcltklib/tcltklib.c (ip_rbUpdateCommand, ip_rb_threadUpdateCommand):

Browse source 
get rid of warnings with Tcl/Tk 8.3 or former (backport from CVS HEAD).


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@8066 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2005-03-04 02:22:36 +00:00
parent 494c91af1f
commit 437fb244f4
2 changed files with 9 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
ChangeLog
View file

@ -1,3 +1,10 @@
Fri Mar 4 11:17:06 2005 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tcltklib/tcltklib.c (ip_rbUpdateCommand): get rid of
warnings with Tcl/Tk 8.3 or former (backport from CVS_HEAD).
* ext/tcltklib/tcltklib.c (ip_rb_threadUpdateCommand): ditto.
Thu Mar 4 07:07:00 2005 NARUSE, Yui <naruse@ruby-lang.org>
* ext/nkf/nkf-utf8/nkf.c: follow nkf 1.63

4
ext/tcltklib/tcltklib.c
View file

@ -2909,7 +2909,7 @@ ip_rbUpdateCommand(clientData, interp, objc, objv)
flags = TCL_ALL_EVENTS|TCL_DONT_WAIT;
} else if (objc == 2) {
if (Tcl_GetIndexFromObj(interp, objv[1], updateOptions,
if (Tcl_GetIndexFromObj(interp, objv[1], (CONST84 char **)updateOptions,
"option", 0, &optionIndex) != TCL_OK) {
return TCL_ERROR;
}
@ -3060,7 +3060,7 @@ ip_rb_threadUpdateCommand(clientData, interp, objc, objv)
flags = TCL_ALL_EVENTS|TCL_DONT_WAIT;
} else if (objc == 2) {
if (Tcl_GetIndexFromObj(interp, objv[1], updateOptions,
if (Tcl_GetIndexFromObj(interp, objv[1], (CONST84 char **)updateOptions,
"option", 0, &optionIndex) != TCL_OK) {
return TCL_ERROR;
}