From 2cdcc564fd9a15e8f6d7f20c972cdc6e98243b67 Mon Sep 17 00:00:00 2001
From: akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 17 Jul 2009 09:13:29 +0000
Subject: * struct.c (recursive_hash): extracted from rb_struct_hash.  reject  
 recursive key.   (rb_struct_hash): use recursive_hash.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@24166 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 struct.c | 25 +++++++++++++++++--------
 1 file changed, 17 insertions(+), 8 deletions(-)

(limited to 'struct.c')

diff --git a/struct.c b/struct.c
index a93ed65f7d..e4b6da0e76 100644
--- a/struct.c
+++ b/struct.c
@@ -802,20 +802,16 @@ rb_struct_equal(VALUE s, VALUE s2)
     return Qtrue;
 }
 
-/*
- * call-seq:
- *   struct.hash   => fixnum
- *
- * Return a hash value based on this struct's contents.
- */
-
 static VALUE
-rb_struct_hash(VALUE s)
+recursive_hash(VALUE s, VALUE dummy, int recur)
 {
     long i;
     unsigned long h;
     VALUE n;
 
+    if (recur) {
+        rb_raise(rb_eArgError, "recursive key for hash");
+    }
     h = rb_hash_start(rb_hash(rb_obj_class(s)));
     for (i = 0; i < RSTRUCT_LEN(s); i++) {
 	n = rb_hash(RSTRUCT_PTR(s)[i]);
@@ -825,6 +821,19 @@ rb_struct_hash(VALUE s)
     return INT2FIX(h);
 }
 
+/*
+ * call-seq:
+ *   struct.hash   => fixnum
+ *
+ * Return a hash value based on this struct's contents.
+ */
+
+static VALUE
+rb_struct_hash(VALUE s)
+{
+    return rb_exec_recursive(recursive_hash, s, 0);
+}
+
 /*
  * code-seq:
  *   struct.eql?(other)   => true or false
-- 
cgit v1.2.3