* vm_eval.c (rb_search_method_entry): show flags and klass value in

  not implemented error message.


git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@25882 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 21 insertions, 10 deletions

diff --git a/vm_eval.c b/vm_eval.c
index 49fe49dbb..d975809f3 100644
--- a/vm_eval.c
+++ b/vm_eval.c
@@ -336,22 +336,33 @@ rb_search_method_entry(VALUE recv, ID mid)
     VALUE klass = CLASS_OF(recv);
 
     if (!klass) {
-        if (!IMMEDIATE_P(recv) && RBASIC(recv)->flags != 0) {
+        if (IMMEDIATE_P(recv)) {
+            rb_raise(rb_eNotImpError,
+                     "method `%s' called on unexpected immediate object (%p)",
+                     rb_id2name(mid), (void *)recv);
+        }
+        if (RBASIC(recv)->flags == 0) {
+            rb_raise(rb_eNotImpError,
+                     "method `%s' called on terminated object"
+                     " (%p flags=0x%"PRIxVALUE" klass=0x%"PRIxVALUE")",
+                     rb_id2name(mid), (void *)recv,
+                     RBASIC(recv)->flags, RBASIC(recv)->klass);
+        }
+        else {
             int type = BUILTIN_TYPE(recv);
             const char *typestr = rb_type_str(type);
             if (typestr)
                 rb_raise(rb_eNotImpError,
-                         "method `%s' called on hidden %s object (%p)",
-                         rb_id2name(mid), typestr, (void *)recv);
+                         "method `%s' called on hidden %s object"
+                         " (%p flags=0x%"PRIxVALUE" klass=0x%"PRIxVALUE")",
+                         rb_id2name(mid), typestr, (void *)recv,
+                         RBASIC(recv)->flags, RBASIC(recv)->klass);
             else
                 rb_raise(rb_eNotImpError,
-                         "method `%s' called on hidden T_???" "(0x%02x) object (%p)",
-                         rb_id2name(mid), type, (void *)recv);
-        }
-        else {
-            rb_raise(rb_eNotImpError,
-                     "method `%s' called on terminated object (%p)",
-                     rb_id2name(mid), (void *)recv);
+                         "method `%s' called on hidden T_???" "(0x%02x) object"
+                         " (%p flags=0x%"PRIxVALUE" klass=0x%"PRIxVALUE")",
+                         rb_id2name(mid), type, (void *)recv,
+                         RBASIC(recv)->flags, RBASIC(recv)->klass);
         }
     }
     return rb_method_entry(klass, mid);