matz	2007-11-02 15:30:26 +0900 (Fri, 02 Nov 2007)

  New Revision: 13803

  Modified files:
    branches/ruby_1_8/ChangeLog
    branches/ruby_1_8/array.c
    branches/ruby_1_8/hash.c
    branches/ruby_1_8/version.h

  Log:
    * array.c (rb_ary_assoc): check and convert inner arrays (assocs)
      using #to_ary.
    
    * hash.c (rb_hash_s_create): check and convert argument hash
      using #to_hash.
    
    * hash.c (rb_hash_s_create): Hash#[] now takes assocs as source of
      hash conversion.

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8/ChangeLog?r1=13803&r2=13802
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8/version.h?r1=13803&r2=13802
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8/hash.c?r1=13803&r2=13802
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8/array.c?r1=13803&r2=13802

Index: ruby_1_8/array.c
===================================================================
--- ruby_1_8/array.c	(revision 13802)
+++ ruby_1_8/array.c	(revision 13803)
@@ -2420,10 +2420,9 @@
     VALUE v;
 
     for (i = 0; i < RARRAY(ary)->len; ++i) {
-	v = RARRAY(ary)->ptr[i];
-	if (TYPE(v) == T_ARRAY &&
-	    RARRAY(v)->len > 0 &&
-	    rb_equal(RARRAY(v)->ptr[0], key))
+	v = rb_check_array_type(RARRAY_PTR(ary)[i]);
+	if (!NIL_P(v) && RARRAY(v)->len > 0 &&
+	    rb_equal(RARRAY_PTR(v)[0], key))
 	    return v;
     }
     return Qnil;
Index: ruby_1_8/hash.c
===================================================================
--- ruby_1_8/hash.c	(revision 13802)
+++ ruby_1_8/hash.c	(revision 13803)
@@ -336,16 +336,32 @@
     VALUE *argv;
     VALUE klass;
 {
-    VALUE hash;
+    VALUE hash, tmp;
     int i;
 
-    if (argc == 1 && TYPE(argv[0]) == T_HASH) {
-	hash = hash_alloc0(klass);
-	RHASH(hash)->tbl = st_copy(RHASH(argv[0])->tbl);
+    if (argc == 1) {
+	tmp = rb_check_convert_type(argv[0], T_HASH, "Hash", "to_hash");
+	if (!NIL_P(tmp)) {
+	    hash = hash_alloc0(klass);
+	    RHASH(hash)->tbl = st_copy(RHASH(tmp)->tbl);
+	    return hash;
+	}
 
-	return hash;
+	tmp = rb_check_array_type(argv[0]);
+	if (!NIL_P(tmp)) {
+	    long i;
+
+	    hash = hash_alloc(klass);
+	    for (i = 0; i < RARRAY_LEN(tmp); ++i) {
+		VALUE v = rb_check_array_type(RARRAY_PTR(tmp)[i]);
+		
+		if (NIL_P(v)) continue;
+		if (RARRAY_LEN(v) < 1 || 2 < RARRAY_LEN(v)) continue;
+		rb_hash_aset(hash, RARRAY_PTR(v)[0], RARRAY_PTR(v)[1]);
+	    }
+	    return hash;
+	}
     }
-
     if (argc % 2 != 0) {
 	rb_raise(rb_eArgError, "odd number of arguments for Hash");
     }
Index: ruby_1_8/ChangeLog
===================================================================
--- ruby_1_8/ChangeLog	(revision 13802)
+++ ruby_1_8/ChangeLog	(revision 13803)
@@ -1,3 +1,14 @@
+Fri Nov  2 00:13:51 2007  Yukihiro Matsumoto  <matz@r...>
+
+	* array.c (rb_ary_assoc): check and convert inner arrays (assocs)
+	  using #to_ary.
+
+	* hash.c (rb_hash_s_create): check and convert argument hash
+	  using #to_hash.
+
+	* hash.c (rb_hash_s_create): Hash#[] now takes assocs as source of
+	  hash conversion.
+
 Thu Nov  1 23:47:43 2007  Masatoshi SEKI  <m_seki@m...>
 
 	* lib/drb/drb.rb (DRbTCPSocket): Improving with multiple network
Index: ruby_1_8/version.h
===================================================================
--- ruby_1_8/version.h	(revision 13802)
+++ ruby_1_8/version.h	(revision 13803)
@@ -1,15 +1,15 @@
 #define RUBY_VERSION "1.8.6"
-#define RUBY_RELEASE_DATE "2007-10-26"
+#define RUBY_RELEASE_DATE "2007-11-02"
 #define RUBY_VERSION_CODE 186
-#define RUBY_RELEASE_CODE 20071026
+#define RUBY_RELEASE_CODE 20071102
 #define RUBY_PATCHLEVEL 5000
 
 #define RUBY_VERSION_MAJOR 1
 #define RUBY_VERSION_MINOR 8
 #define RUBY_VERSION_TEENY 6
 #define RUBY_RELEASE_YEAR 2007
-#define RUBY_RELEASE_MONTH 10
-#define RUBY_RELEASE_DAY 26
+#define RUBY_RELEASE_MONTH 11
+#define RUBY_RELEASE_DAY 2
 
 #ifdef RUBY_EXTERN
 RUBY_EXTERN const char ruby_version[];

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml