* marshal.c (r_object0): check T_STRUCT type for structs.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@13418 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 3 insertions, 0 deletions

diff --git a/marshal.c b/marshal.c
index cb5169bec..f540e52f3 100644
--- a/marshal.c
+++ b/marshal.c
@@ -1263,6 +1263,9 @@ r_object0(struct load_arg *arg, int *ivp, VALUE extmod)
             }
 
             v = rb_obj_alloc(klass);
+	    if (TYPE(v) != T_STRUCT) {
+		rb_raise(rb_eArgError, "dump format error");
+	    }
 	    v = r_entry(v, arg);
 	    values = rb_ary_new2(len);
 	    for (i=0; i<len; i++) {