pike.git/
src/
builtin_functions.c
Branch:
Tag:
Non-build tags
All tags
No tags
1996-11-02
1996-11-02 00:18:12 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
13cc84e4a927e2d3b037c8fc966d6192efff736f (
9
lines) (+
5
/-
4
)
[
Show
|
Annotate
]
Branch:
7.9
f_lower_case and f_upper_case fixed
Rev: src/builtin_functions.c:1.8
133:
MEMCPY(ret->str, sp[-args].u.string->str,sp[-args].u.string->len); for (i = sp[-args].u.string->len-1; i>=0; i--)
-
if (isupper(ret->str
[
i
]
))
-
ret->str[i] = tolower(ret->
str[i]
);
+
if (isupper(
EXTRACT_UCHAR(
ret->str
+
i))
)
+
ret->str[i] = tolower(
EXTRACT_UCHAR(
ret->
str+i
)
)
;
pop_n_elems(args); push_string(end_shared_string(ret));
153:
MEMCPY(ret->str, sp[-args].u.string->str,sp[-args].u.string->len); for (i = sp[-args].u.string->len-1; i>=0; i--)
-
if (islower(ret->
str[i]
))
-
ret->str[i] = toupper(ret->
str[i]
);
+
if (islower(
EXTRACT_UCHAR(
ret->
str+i
))
)
+
ret->str[i] = toupper(
EXTRACT_UCHAR(
ret->
str+i
)
)
;
pop_n_elems(args); push_string(end_shared_string(ret));