naruse	2008-02-16 18:30:03 +0900 (Sat, 16 Feb 2008)

  New Revision: 15507

  Modified files:
    trunk/ChangeLog
    trunk/string.c

  Log:
    * string.c (str_strlen): little more optimize.
      (rb_enc_nth): remove needless variable 'c'.

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/string.c?r1=15507&r2=15506&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/ChangeLog?r1=15507&r2=15506&diff_format=u

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 15506)
+++ ChangeLog	(revision 15507)
@@ -1,3 +1,8 @@
+Sat Feb 16 18:25:14 2008  NARUSE, Yui  <naruse@r...>
+
+	* string.c (str_strlen): little more optimize.
+	  (rb_enc_nth): remove needless variable 'c'.
+
 Sat Feb 16 18:00:13 2008  Tanaka Akira  <akr@f...>
 
 	* encoding.c (rb_enc_compatible): empty strings are always compatible.
Index: string.c
===================================================================
--- string.c	(revision 15506)
+++ string.c	(revision 15507)
@@ -643,9 +643,11 @@
 	    }
 	    while (s < t) {
 		unsigned long d = *s;
-		d = (~d ^ (d&(d<<1)))&NONASCII_MASK;
-		d = (d>>7) + (d>>15);
-		d = d + (d>>16);
+		d = ~d | (d<<1);
+		d &= NONASCII_MASK;
+		d >>= 7;
+		d += (d>>8);
+		d += (d>>16);
 #if NONASCII_MASK == 0x8080808080808080UL
 		d = d + (d>>32);
 #endif
@@ -657,6 +659,7 @@
 	for (; p<e; p++) {
 	    if (((*p)&0xC0) != 0x80) len++;
 	}
+	return len;
     }
     else
 #endif
@@ -664,6 +667,9 @@
     if (len < 0) {
 	rb_raise(rb_eArgError, "invalid mbstring sequence");
     }
+    if (ENC_CODERANGE(str) != ENC_CODERANGE_VALID && enc == STR_ENC_GET(str)) {
+	ENC_CODERANGE_SET(str, ENC_CODERANGE_VALID);
+    }
     return len;
 }
 
@@ -949,8 +955,6 @@
 char*
 rb_enc_nth(const char *p, const char *e, int nth, rb_encoding *enc)
 {
-    int c;
-
     if (rb_enc_mbmaxlen(enc) == 1) {
         p += nth;
     }
@@ -981,10 +985,8 @@
         return (char *)p;
     }
     else {
-        for (c=0; p<e && nth--; c++) {
-            int n = rb_enc_mbclen(p, e, enc);
-
-            p += n;
+        while (p<e && nth--) {
+            p += rb_enc_mbclen(p, e, enc);
         }
     }
     if (p > e) p = e;

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