fixed Regexp.quote

git-svn-id: http://svn.macosforge.org/repository/ruby/MacRuby/branches/experimental@2210 23306eb0-4c56-4727-a40e-e92c0eb68959
MacRuby · Aug 4, 2009 · 6a41d99 · 6a41d99
1 parent 2d1c0a2
commit 6a41d99
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/re.c b/re.c
@@ -3118,7 +3118,7 @@ rb_reg_quote(VALUE str)
     char *t_beg;
 
   meta_found:
-    t_beg = (char *)alloca(RSTRING_LEN(str) * 2);
+    t_beg = (char *)alloca(RSTRING_LEN(str) * 2 + 1);
     t = t_beg;
     /* copy upto metacharacter */
     memcpy(t, RSTRING_PTR(str), s - RSTRING_PTR(str));
@@ -3163,8 +3163,10 @@ rb_reg_quote(VALUE str)
 	}
 	*t++ = c;
     }
+    // rb_str_new wants a NULL-terminated string
+    *t = 0;
 
-    return rb_str_new(t, t - t_beg);
+    return rb_str_new(t_beg, t - t_beg);
 }