summaryrefslogtreecommitdiff
path: root/ext/tcltklib
diff options
context:
space:
mode:
authormatz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2003-12-25 08:49:20 +0000
committermatz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2003-12-25 08:49:20 +0000
commitf7d46c88609f4991ef899059a7d16801aa245574 (patch)
treeb86dbe8088e187eb3eaf6cb529562af684586566 /ext/tcltklib
parent33e05ba9163ef85d95d3117c5a56ef5e96cc99cb (diff)
* string.c (rb_str_update): call rb_str_modify().
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@5293 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tcltklib')
-rw-r--r--ext/tcltklib/tcltklib.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c
index ad7e377b66..a7de967838 100644
--- a/ext/tcltklib/tcltklib.c
+++ b/ext/tcltklib/tcltklib.c
@@ -824,7 +824,7 @@ ip_ruby(clientData, interp, argc, argv)
/* status check */
if (arg.failed) {
- VALUE eclass = CLASS_OF(arg.failed);
+ VALUE eclass = rb_obj_class(arg.failed);
DUMP1("(rb_eval_string result) failed");
Tcl_ResetResult(interp);
Tcl_AppendResult(interp, StringValuePtr(arg.failed), (char*)NULL);