2000-06-22

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

1 files changed, 3 insertions, 1 deletions

diff --git a/marshal.c b/marshal.c
index 4b385dc117..19a06a99f4 100644
--- a/marshal.c
+++ b/marshal.c
@@ -397,7 +397,9 @@ w_object(obj, arg, limit)
 		char *path;
 
 		if (FL_TEST(klass, FL_SINGLETON)) {
-		    rb_raise(rb_eTypeError, "singleton can't be dumped");
+		    if (RCLASS(klass)->m_tbl->num_entries > 0) {
+			rb_raise(rb_eTypeError, "singleton can't be dumped");
+		    }
 		}
 		path = rb_class2name(klass);
 		w_unique(path, arg);