1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

* ext/tcltklib/tcltklib.c: compile error on bcc32 [ruby-dev:24081]

Browse Source 
* ext/tk/lib/multi-tk.rb: MultiTkIp#eval_string does not work


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6830 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2004-08-29 05:12:00 +00:00
parent a1dd800235
commit 1cf49eb9f3
3 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ChangeLog
View File

@ -1,3 +1,9 @@
Sun Aug 29 14:08:56 2004 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tcltklib/tcltklib.c: compile error on bcc32 [ruby-dev:24081]
* ext/tk/lib/multi-tk.rb: MultiTkIp#eval_string does not work
Sat Aug 28 23:04:41 2004 Yukihiro Matsumoto <matz@ruby-lang.org> Sat Aug 28 23:04:41 2004 Yukihiro Matsumoto <matz@ruby-lang.org>
* bignum.c (rb_big_and): protect parameters from GC. * bignum.c (rb_big_and): protect parameters from GC.

4
ext/tcltklib/tcltklib.c
View File

@ -97,7 +97,8 @@ static VALUE ip_invoke _((int, VALUE*, VALUE));
/* from tkAppInit.c */ /* from tkAppInit.c */
#if !defined __MINGW32__ #if TCL_MAJOR_VERSION < 8 || (TCL_MAJOR_VERSION == 8 && TCL_MINOR_VERSION < 4)
# if !defined __MINGW32__ && !defined __BORLANDC__
/* /*
* The following variable is a special hack that is needed in order for * The following variable is a special hack that is needed in order for
* Sun shared libraries to be used for Tcl. * Sun shared libraries to be used for Tcl.
@ -106,6 +107,7 @@ static VALUE ip_invoke _((int, VALUE*, VALUE));
extern int matherr(); extern int matherr();
int *tclDummyMathPtr = (int *) matherr; int *tclDummyMathPtr = (int *) matherr;
# endif # endif
#endif
/*---- module TclTkLib ----*/ /*---- module TclTkLib ----*/

2
ext/tk/lib/multi-tk.rb
View File

@ -857,7 +857,7 @@ class MultiTkIp
if cmd.kind_of?(String) if cmd.kind_of?(String)
xcmd = cmd xcmd = cmd
xargs = args xargs = args
cmd = proc{ TkComm._get_eval_string(TkUtil.eval_cmd(xcmd, *xargs)) } cmd = proc{ TkComm._get_eval_string(eval(xcmd, *xargs)) }
args = [] args = []
end end