test_begin "test_objectspace"

# assert_normal_exit proc{
#   eval("", TOPLEVEL_BINDING)
#   minobj = ObjectSpace.to_enum(:each_object).min_by {|a| a.object_id }
#   maxobj = ObjectSpace.to_enum(:each_object).max_by {|a| a.object_id }
#   (((minobj.object_id-100)..(minobj.object_id+100))+
#    ((maxobj.object_id-100)..(maxobj.object_id+100))).each {|id|
#     begin
#       o = ObjectSpace._id2ref(id)
#     rescue RangeError
#       next
#     end
#     o.inspect if defined?(o.inspect)
#   }
# }, '[ruby-dev:31911]'

# assert_normal_exit proc{
#   ary = (1..10).to_a
#   ary.permutation(2) {|x|
#     if x == [1,2]
#       ObjectSpace.each_object(String) {|s|
#         s.clear if !s.frozen? && (s.length == 40 || s.length == 80)
#       }
#     end
#   }
# }, '[ruby-dev:31982]'

# assert_normal_exit proc{
#   ary = (1..100).to_a
#   ary.permutation(2) {|x|
#     if x == [1,2]
#       ObjectSpace.each_object(Array) {|o| o.clear if o == ary && o.object_id != ary.object_id }
#     end
#   }
# }, '[ruby-dev:31985]'

test_end