From f2c2fb5ac4929395885ae349231de49d62e2fde4 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 25 Feb 2002 09:16:25 +0000
Subject: * eval.c (method_inspect): should not dump core for unbound  
 singleton methods.

* object.c (rb_mod_to_s): better description.

* hash.c (env_select): should path the assoc list.

* process.c (rb_syswait): thread kludge; should be fixed to
  support native thread.


git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@2128 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 object.c | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'object.c')

diff --git a/object.c b/object.c
index 240a51c3f..bf2207536 100644
--- a/object.c
+++ b/object.c
@@ -500,9 +500,17 @@ rb_mod_to_s(klass)
 {
     if (FL_TEST(klass, FL_SINGLETON)) {
 	VALUE s = rb_str_new2("#<");
+	VALUE v = rb_iv_get(klass, "__attached__");
 
 	rb_str_cat2(s, "Class:");
-	rb_str_cat2(s, rb_class2name(klass));
+	switch (TYPE(v)) {
+	  case T_CLASS: case T_MODULE:
+	    rb_str_append(s, rb_inspect(v));
+	    break;
+	  default:
+	    rb_str_append(s, rb_any_to_s(v));
+	    break;
+	}
 	rb_str_cat2(s, ">");
 
 	return s;
-- 
cgit