nobu	2008-06-27 13:18:54 +0900 (Fri, 27 Jun 2008)

  New Revision: 17598

  Modified files:
    branches/mvm/ChangeLog
    branches/mvm/include/ruby/intern.h
    branches/mvm/string.c
    trunk/ChangeLog
    trunk/include/ruby/intern.h
    trunk/string.c

  Log:
    * include/ruby/intern.h (rb_str_new2, rb_tainted_str_new2,
      rb_usascii_str_new2): use with-length versions with strlen to
      optimize strlen.


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/string.c?r1=17598&r2=17597&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/ChangeLog?r1=17598&r2=17597&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/mvm/ChangeLog?r1=17598&r2=17597&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/mvm/string.c?r1=17598&r2=17597&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/include/ruby/intern.h?r1=17598&r2=17597&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/mvm/include/ruby/intern.h?r1=17598&r2=17597&diff_format=u

Index: include/ruby/intern.h
===================================================================
--- include/ruby/intern.h	(revision 17597)
+++ include/ruby/intern.h	(revision 17598)
@@ -535,6 +535,11 @@
 VALUE rb_str_tmp_new(long);
 VALUE rb_usascii_str_new(const char*, long);
 VALUE rb_usascii_str_new2(const char*);
+#ifdef __GNUC__
+#define rb_str_new2(str) ({const char *_s = (str); rb_str_new(_s, strlen(_s));})
+#define rb_tainted_str_new2(str) ({const char *_s = (str); rb_tainted_str_new(_s, strlen(_s));})
+#define rb_usascii_str_new2(str) ({const char *_s = (str); rb_usascii_str_new(_s, strlen(_s));})
+#endif
 void rb_str_free(VALUE);
 void rb_str_shared_replace(VALUE, VALUE);
 VALUE rb_str_buf_append(VALUE, VALUE);
Index: ChangeLog
===================================================================
--- ChangeLog	(revision 17597)
+++ ChangeLog	(revision 17598)
@@ -1,3 +1,9 @@
+Fri Jun 27 13:18:52 2008  Nobuyoshi Nakada  <nobu@r...>
+
+	* include/ruby/intern.h (rb_str_new2, rb_tainted_str_new2,
+	  rb_usascii_str_new2): use with-length versions with strlen to
+	  optimize strlen.
+
 Fri Jun 27 12:28:57 2008  Nobuyoshi Nakada  <nobu@r...>
 
 	* lib/un.rb (mkmf): new command to create makefile.
Index: string.c
===================================================================
--- string.c	(revision 17597)
+++ string.c	(revision 17598)
@@ -25,6 +25,10 @@
 #include <unistd.h>
 #endif
 
+#undef rb_str_new2
+#undef rb_tainted_str_new2
+#undef rb_usascii_str_new2
+
 VALUE rb_cString;
 VALUE rb_cSymbol;
 
Index: mvm/include/ruby/intern.h
===================================================================
--- mvm/include/ruby/intern.h	(revision 17597)
+++ mvm/include/ruby/intern.h	(revision 17598)
@@ -535,6 +535,11 @@
 VALUE rb_str_tmp_new(long);
 VALUE rb_usascii_str_new(const char*, long);
 VALUE rb_usascii_str_new2(const char*);
+#ifdef __GNUC__
+#define rb_str_new2(str) ({const char *_s = (str); rb_str_new(_s, strlen(_s));})
+#define rb_tainted_str_new2(str) ({const char *_s = (str); rb_tainted_str_new(_s, strlen(_s));})
+#define rb_usascii_str_new2(str) ({const char *_s = (str); rb_usascii_str_new(_s, strlen(_s));})
+#endif
 void rb_str_free(VALUE);
 void rb_str_shared_replace(VALUE, VALUE);
 VALUE rb_str_buf_append(VALUE, VALUE);
Index: mvm/ChangeLog
===================================================================
--- mvm/ChangeLog	(revision 17597)
+++ mvm/ChangeLog	(revision 17598)
@@ -1,3 +1,9 @@
+Fri Jun 27 13:18:52 2008  Nobuyoshi Nakada  <nobu@r...>
+
+	* include/ruby/intern.h (rb_str_new2, rb_tainted_str_new2,
+	  rb_usascii_str_new2): use with-length versions with strlen to
+	  optimize strlen.
+
 Fri Jun 27 13:10:41 2008  Nobuyoshi Nakada  <nobu@r...>
 
 	* configure.in: need to check sigaltstack and others regardless
Index: mvm/string.c
===================================================================
--- mvm/string.c	(revision 17597)
+++ mvm/string.c	(revision 17598)
@@ -25,6 +25,10 @@
 #include <unistd.h>
 #endif
 
+#undef rb_str_new2
+#undef rb_tainted_str_new2
+#undef rb_usascii_str_new2
+
 VALUE rb_cString;
 VALUE rb_cSymbol;
 

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