* gc.c (os_live_obj): fix to skip T_VALUES.

* sample/test.rb: add an ObjectSpace test.



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

ChangeLog

@@ -1,3 +1,9 @@
+Wed Aug 15 18:57:30 2007  Koichi Sasada  <ko1@atdot.net>
+
+	* gc.c (os_live_obj): fix to skip T_VALUES.
+
+	* sample/test.rb: add an ObjectSpace test.
+
 Wed Aug 15 16:49:04 2007  Koichi Sasada  <ko1@atdot.net>
 
 	* inits.c (rb_call_inits): change initializing order.

gc.c

@@ -1698,6 +1698,7 @@ os_live_obj(void)
 		switch (TYPE(p)) {
 		  case T_ICLASS:
 		  case T_NODE:
+		  case T_VALUES:
 		    continue;
 		  case T_CLASS:
 		    if (FL_TEST(p, FL_SINGLETON)) continue;

sample/test.rb

@@ -2215,6 +2215,11 @@ l = []
 GC.start
 test_ok true   # reach here or dumps core
 
+ObjectSpace.each_object{|o|
+  o.class.name
+}
+test_ok true   # reach here or dumps core
+
 if $failed > 0
   printf "not ok/test: %d failed %d\n", $ntest, $failed
 else