From 74c63cd4973e0bc47a37fda92f00558fdf2e711e Mon Sep 17 00:00:00 2001 From: matz Date: Mon, 7 Aug 2000 06:11:34 +0000 Subject: matz git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@877 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ruby.h | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'ruby.h') diff --git a/ruby.h b/ruby.h index 9dd5f05c0..11c429ffa 100644 --- a/ruby.h +++ b/ruby.h @@ -222,7 +222,8 @@ VALUE rb_newobj _((void)); if (rb_safe_level() >= 3) FL_SET(obj, FL_TAINT);\ } #define CLONESETUP(clone,obj) do {\ - OBJSETUP(clone,rb_singleton_class_clone(RBASIC(obj)->klass),RBASIC(obj)->flags);\ + RBASIC(clone)->flags = (RBASIC(obj)->flags);\ + RBASIC(obj)->klass = (rb_singleton_class_clone(RBASIC(obj)->klass));\ rb_singleton_class_attached(RBASIC(clone)->klass, (VALUE)clone);\ if (FL_TEST(obj, FL_EXIVAR)) rb_clone_generic_ivar((VALUE)clone,(VALUE)obj);\ } while (0) -- cgit