diff options
-rw-r--r-- | ChangeLog | 4 | ||||
-rw-r--r-- | struct.c | 18 |
2 files changed, 22 insertions, 0 deletions
@@ -1,3 +1,7 @@ +Tue Apr 15 19:12:21 2003 Nobuyoshi Nakada <nobu.nokada@softhome.net> + + * struct.c (rb_struct_hash): new methods Struct#hash, Struct#eql?. + Tue Apr 15 16:05:11 2003 Nobuyoshi Nakada <nobu.nokada@softhome.net> * numeric.c (rb_fix2str): buffer was insufficient. @@ -577,6 +577,22 @@ rb_struct_equal(s, s2) } static VALUE +rb_struct_hash(s) + VALUE s; +{ + long i, h; + VALUE n; + + h = rb_hash(rb_obj_class(s)); + for (i = 0; i < RSTRUCT(s)->len; i++) { + h = (h << 1) | (h<0 ? 1 : 0); + n = rb_hash(RSTRUCT(s)->ptr[i]); + h ^= NUM2LONG(n); + } + return LONG2FIX(h); +} + +static VALUE rb_struct_size(s) VALUE s; { @@ -596,6 +612,8 @@ Init_Struct() rb_define_method(rb_cStruct, "copy_object", rb_struct_copy_object, 1); rb_define_method(rb_cStruct, "==", rb_struct_equal, 1); + rb_define_method(rb_cStruct, "eql?", rb_struct_equal, 1); + rb_define_method(rb_cStruct, "hash", rb_struct_hash, 0); rb_define_method(rb_cStruct, "to_s", rb_struct_to_s, 0); rb_define_method(rb_cStruct, "inspect", rb_struct_inspect, 0); |