From 5aafbca0e4769ca93ae088ec83f1ec6007e169a7 Mon Sep 17 00:00:00 2001 From: takkaw Date: Mon, 14 Jan 2013 20:33:49 +0900 Subject: fix segmentation fault in BasicObject#inspect --- src/class.c | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/src/class.c b/src/class.c index 6f83e997e..59431c26e 100644 --- a/src/class.c +++ b/src/class.c @@ -1139,8 +1139,13 @@ mrb_bob_missing(mrb_state *mrb, mrb_value mod) mrb_raise(mrb, E_TYPE_ERROR, "name should be a symbol"); } - inspect = mrb_funcall(mrb, mod, "inspect", 0); - if (RSTRING_LEN(inspect) > 64) { + if (mrb_respond_to(mrb,mod,mrb_intern(mrb,"inspect"))){ + inspect = mrb_funcall(mrb, mod, "inspect", 0); + if (RSTRING_LEN(inspect) > 64) { + inspect = mrb_any_to_s(mrb, mod); + } + } + else { inspect = mrb_any_to_s(mrb, mod); } -- cgit v1.2.3