Mercurial > emacs
comparison src/editfns.c @ 2384:5ab51b7300e4
(Fchar_equal): Don't ignore high bits of character.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 27 Mar 1993 04:20:05 +0000 |
| parents | 69c58e548ca5 |
| children | 4a7e1c2a2a9e |
comparison
equal
deleted
inserted
replaced
| 2383:b7941d286c3f | 2384:5ab51b7300e4 |
|---|---|
| 1414 unsigned char *downcase = DOWNCASE_TABLE; | 1414 unsigned char *downcase = DOWNCASE_TABLE; |
| 1415 CHECK_NUMBER (c1, 0); | 1415 CHECK_NUMBER (c1, 0); |
| 1416 CHECK_NUMBER (c2, 1); | 1416 CHECK_NUMBER (c2, 1); |
| 1417 | 1417 |
| 1418 if (!NILP (current_buffer->case_fold_search) | 1418 if (!NILP (current_buffer->case_fold_search) |
| 1419 ? downcase[0xff & XFASTINT (c1)] == downcase[0xff & XFASTINT (c2)] | 1419 ? (downcase[0xff & XFASTINT (c1)] == downcase[0xff & XFASTINT (c2)] |
| 1420 && (XFASTINT (c1) & ~0xff) == (XFASTINT (c2) & ~0xff)) | |
| 1420 : XINT (c1) == XINT (c2)) | 1421 : XINT (c1) == XINT (c2)) |
| 1421 return Qt; | 1422 return Qt; |
| 1422 return Qnil; | 1423 return Qnil; |
| 1423 } | 1424 } |
| 1424 | 1425 |