aboutsummaryrefslogtreecommitdiffstats
path: root/src/editfns.c
diff options
context:
space:
mode:
authorPaul Eggert2011-03-15 14:14:06 -0700
committerPaul Eggert2011-03-15 14:14:06 -0700
commit5da9919f99ebacbc511113134ef8f687a562d5b8 (patch)
tree93ca25d179a3ad53796e4132fc98c06ecb704a91 /src/editfns.c
parentb313f9d86378db4dd4619923572b07513c53ceac (diff)
downloademacs-5da9919f99ebacbc511113134ef8f687a562d5b8.tar.gz
emacs-5da9919f99ebacbc511113134ef8f687a562d5b8.zip
Use functions, not macros, for up- and down-casing.
Diffstat (limited to 'src/editfns.c')
-rw-r--r--src/editfns.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/editfns.c b/src/editfns.c
index d92d3482d09..59cf269ef7b 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -1374,7 +1374,7 @@ name, or nil if there is no such user. */)
1374 memcpy (r, p, q - p); 1374 memcpy (r, p, q - p);
1375 r[q - p] = 0; 1375 r[q - p] = 0;
1376 strcat (r, SSDATA (login)); 1376 strcat (r, SSDATA (login));
1377 r[q - p] = UPCASE ((unsigned char) r[q - p]); 1377 r[q - p] = upcase ((unsigned char) r[q - p]);
1378 strcat (r, q + 1); 1378 strcat (r, q + 1);
1379 full = build_string (r); 1379 full = build_string (r);
1380 } 1380 }
@@ -4213,7 +4213,7 @@ Case is ignored if `case-fold-search' is non-nil in the current buffer. */)
4213{ 4213{
4214 int i1, i2; 4214 int i1, i2;
4215 /* Check they're chars, not just integers, otherwise we could get array 4215 /* Check they're chars, not just integers, otherwise we could get array
4216 bounds violations in DOWNCASE. */ 4216 bounds violations in downcase. */
4217 CHECK_CHARACTER (c1); 4217 CHECK_CHARACTER (c1);
4218 CHECK_CHARACTER (c2); 4218 CHECK_CHARACTER (c2);
4219 4219
@@ -4224,7 +4224,7 @@ Case is ignored if `case-fold-search' is non-nil in the current buffer. */)
4224 4224
4225 /* Do these in separate statements, 4225 /* Do these in separate statements,
4226 then compare the variables. 4226 then compare the variables.
4227 because of the way DOWNCASE uses temp variables. */ 4227 because of the way downcase uses temp variables. */
4228 i1 = XFASTINT (c1); 4228 i1 = XFASTINT (c1);
4229 if (NILP (BVAR (current_buffer, enable_multibyte_characters)) 4229 if (NILP (BVAR (current_buffer, enable_multibyte_characters))
4230 && ! ASCII_CHAR_P (i1)) 4230 && ! ASCII_CHAR_P (i1))
@@ -4237,8 +4237,8 @@ Case is ignored if `case-fold-search' is non-nil in the current buffer. */)
4237 { 4237 {
4238 MAKE_CHAR_MULTIBYTE (i2); 4238 MAKE_CHAR_MULTIBYTE (i2);
4239 } 4239 }
4240 i1 = DOWNCASE (i1); 4240 i1 = downcase (i1);
4241 i2 = DOWNCASE (i2); 4241 i2 = downcase (i2);
4242 return (i1 == i2 ? Qt : Qnil); 4242 return (i1 == i2 ? Qt : Qnil);
4243} 4243}
4244 4244