version 0.73v0_73

https://cache.ruby-lang.org/pub/ruby/1.0/ruby-0.73.tar.gz

Mon Apr 10 18:36:06 1995  Yukihiro Matsumoto  (matz@ix-02)

	* version 0.73

Fri Apr  7 13:51:08 1995  Yukihiro Matsumoto  (matz@ix-02)

	* cons.c->assoc.c: consの余計な機能は外してpairとしての機能だけを
	  残した．enumerableをincludeするのもやめた．

	* string.c(esub): 文字列置換イテレータ．perlのs///eの相当する．

1 files changed, 4 insertions, 4 deletions

diff --git a/array.c b/array.c
index a15f0530ae..93390d6455 100644
--- a/array.c
+++ b/array.c
@@ -803,8 +803,8 @@ Fary_assoc(ary, key)
 
     p = ary->ptr; pend = p + ary->len;
     while (p < pend) {
-	if (TYPE(*p) == T_CONS
-	    && rb_equal(RCONS(*p)->car, key))
+	if (TYPE(*p) == T_ASSOC
+	    && rb_equal(RASSOC(*p)->car, key))
 	    return *p;
     }
     return Qnil;
@@ -819,8 +819,8 @@ Fary_rassoc(ary, value)
 
     p = ary->ptr; pend = p + ary->len;
     while (p < pend) {
-	if (TYPE(*p) == T_CONS
-	    && rb_equal(RCONS(*p)->cdr, value))
+	if (TYPE(*p) == T_ASSOC
+	    && rb_equal(RASSOC(*p)->cdr, value))
 	    return *p;
     }
     return Qnil;