1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

* string.c (rb_str_capitalize_bang): check length before upcase

Browse Source 
first character.  (ruby-bugs:PR#697)


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3621 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2003-03-26 18:26:45 +00:00
parent d82d9923cb
commit 1072ad1c2b
2 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@ -1,3 +1,8 @@
Thu Mar 27 03:26:40 2003 Nobuyoshi Nakada <nobu.nokada@softhome.net>
* string.c (rb_str_capitalize_bang): check length before upcase
first character. (ruby-bugs:PR#697)
Wed Mar 26 20:25:10 2003 Nobuyoshi Nakada <nobu.nokada@softhome.net> Wed Mar 26 20:25:10 2003 Nobuyoshi Nakada <nobu.nokada@softhome.net>
* dln.c (dln_find_1): break if path list end, even for too long * dln.c (dln_find_1): break if path list end, even for too long

1
string.c
View File

@ -2092,6 +2092,7 @@ rb_str_capitalize_bang(str)
int modify = 0; int modify = 0;
rb_str_modify(str); rb_str_modify(str);
if (RSTRING(str)->len == 0 || !RSTRING(str)->ptr) return Qnil;
s = RSTRING(str)->ptr; send = s + RSTRING(str)->len; s = RSTRING(str)->ptr; send = s + RSTRING(str)->len;
if (ISLOWER(*s)) { if (ISLOWER(*s)) {
*s = toupper(*s); *s = toupper(*s);