* gc.c , gc.h (rb_obj_info): export obj_info(VALUE) for debugging.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@50699 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,7 @@
+Mon Jun  1 04:11:48 2015  Koichi Sasada  <[email protected]>
+
+	* gc.c , gc.h (rb_obj_info): export obj_info(VALUE) for debugging.
+
 Mon Jun  1 03:52:55 2015  Koichi Sasada  <[email protected]>
 
 	* test/ruby/test_gc.rb: increase timeout seconds for GC stressful

gc.c

@@ -8975,6 +8975,17 @@ obj_info(VALUE obj)
 }
 #endif
 
+const char *
+rb_obj_info(VALUE obj)
+{
+    if (!rb_special_const_p(obj)) {
+	return obj_info(obj);
+    }
+    else {
+	return obj_type_name(obj);
+    }
+}
+
 #if GC_DEBUG
 
 void

gc.h

@@ -83,6 +83,8 @@ int ruby_get_stack_grow_direction(volatile VALUE *addr);
 #endif
 #define IS_STACK_DIR_UPPER() STACK_DIR_UPPER(1,0)
 
+const char *rb_obj_info(VALUE obj);
+
 RUBY_SYMBOL_EXPORT_BEGIN
 
 /* exports for objspace module */