diff options
Diffstat (limited to 'ruby_2_2/ext/-test-/marshal/compat/usrcompat.c')
-rw-r--r-- | ruby_2_2/ext/-test-/marshal/compat/usrcompat.c | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/ruby_2_2/ext/-test-/marshal/compat/usrcompat.c b/ruby_2_2/ext/-test-/marshal/compat/usrcompat.c deleted file mode 100644 index f812df5631..0000000000 --- a/ruby_2_2/ext/-test-/marshal/compat/usrcompat.c +++ /dev/null @@ -1,32 +0,0 @@ -#include <ruby.h> - -static VALUE -usr_dumper(VALUE self) -{ - return self; -} - -static VALUE -usr_loader(VALUE self, VALUE m) -{ - VALUE val = rb_ivar_get(m, rb_intern("@value")); - *(int *)DATA_PTR(self) = NUM2INT(val); - return self; -} - -static VALUE -compat_mload(VALUE self, VALUE data) -{ - rb_ivar_set(self, rb_intern("@value"), data); - return self; -} - -void -Init_compat(void) -{ - VALUE newclass = rb_path2class("Bug::Marshal::UsrMarshal"); - VALUE oldclass = rb_define_class_under(newclass, "compat", rb_cObject); - - rb_define_method(oldclass, "marshal_load", compat_mload, 1); - rb_marshal_define_compat(newclass, oldclass, usr_dumper, usr_loader); -} |