diff options
Diffstat (limited to 'ext/tcltklib/tcltklib.c')
| -rw-r--r-- | ext/tcltklib/tcltklib.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c index ad7e377b6..a7de96783 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); |