akr	2007-12-17 17:08:23 +0900 (Mon, 17 Dec 2007)

  New Revision: 14263

  Modified files:
    trunk/ChangeLog
    trunk/string.c

  Log:
    * string.c (rb_enc_str_asciionly_p): use rb_enc_str_coderange.


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/string.c?r1=14263&r2=14262
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/ChangeLog?r1=14263&r2=14262

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 14262)
+++ ChangeLog	(revision 14263)
@@ -1,3 +1,7 @@
+Mon Dec 17 17:07:53 2007  Tanaka Akira  <akr@f...>
+
+	* string.c (rb_enc_str_asciionly_p): use rb_enc_str_coderange.
+
 Mon Dec 17 16:39:25 2007  Tanaka Akira  <akr@f...>
 
 	* string.c (rb_enc_str_coderange): set ENC_CODERANGE_BROKEN using
Index: string.c
===================================================================
--- string.c	(revision 14262)
+++ string.c	(revision 14263)
@@ -133,16 +133,10 @@
 {
     rb_encoding *enc = rb_enc_get(str);
 
-    if (rb_enc_asciicompat(enc) &&
-        rb_enc_str_coderange(str) == ENC_CODERANGE_7BIT) {
-        char *ptr = RSTRING_PTR(str);
-        long len = RSTRING_LEN(str);
-        long i;
-        for (i = 0; i < len; i++)
-            if (ptr[i] & 0x80)
-                return Qfalse;
+    if (!rb_enc_asciicompat(enc))
+        return Qfalse;
+    else if (rb_enc_str_coderange(str) == ENC_CODERANGE_7BIT)
         return Qtrue;
-    }
     return Qfalse;
 }
 
@@ -1410,7 +1404,6 @@
 rb_str_casecmp(VALUE str1, VALUE str2)
 {
     long len;
-    int retval;
     rb_encoding *enc;
     char *p1, *p1end, *p2, *p2end;
 

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