diff options
| author | Nick Roberts | 2005-05-01 22:19:14 +0000 |
|---|---|---|
| committer | Nick Roberts | 2005-05-01 22:19:14 +0000 |
| commit | 189cbdd6bb2d92882499667a309d8ee7f637115d (patch) | |
| tree | 4f8c3f2ed5ffe2e4f03042c90fe2fc893b19d568 /src | |
| parent | dc303ca3ef564d1bc96e82b5c20ddf0fc0e9f35c (diff) | |
| download | emacs-189cbdd6bb2d92882499667a309d8ee7f637115d.tar.gz emacs-189cbdd6bb2d92882499667a309d8ee7f637115d.zip | |
(Fchars_in_region): Remove as obsolete.
Diffstat (limited to 'src')
| -rw-r--r-- | src/charset.c | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/src/charset.c b/src/charset.c index c03107a9c46..81708d37b7f 100644 --- a/src/charset.c +++ b/src/charset.c | |||
| @@ -1431,22 +1431,6 @@ The returned value is 0 for left-to-right and 1 for right-to-left. */) | |||
| 1431 | return CHARSET_TABLE_INFO (charset, CHARSET_DIRECTION_IDX); | 1431 | return CHARSET_TABLE_INFO (charset, CHARSET_DIRECTION_IDX); |
| 1432 | } | 1432 | } |
| 1433 | 1433 | ||
| 1434 | DEFUN ("chars-in-region", Fchars_in_region, Schars_in_region, 2, 2, 0, | ||
| 1435 | doc: /* Return number of characters between BEG and END. */) | ||
| 1436 | (beg, end) | ||
| 1437 | Lisp_Object beg, end; | ||
| 1438 | { | ||
| 1439 | int from, to; | ||
| 1440 | |||
| 1441 | CHECK_NUMBER_COERCE_MARKER (beg); | ||
| 1442 | CHECK_NUMBER_COERCE_MARKER (end); | ||
| 1443 | |||
| 1444 | from = min (XFASTINT (beg), XFASTINT (end)); | ||
| 1445 | to = max (XFASTINT (beg), XFASTINT (end)); | ||
| 1446 | |||
| 1447 | return make_number (to - from); | ||
| 1448 | } | ||
| 1449 | |||
| 1450 | /* Return the number of characters in the NBYTES bytes at PTR. | 1434 | /* Return the number of characters in the NBYTES bytes at PTR. |
| 1451 | This works by looking at the contents and checking for multibyte sequences. | 1435 | This works by looking at the contents and checking for multibyte sequences. |
| 1452 | However, if the current buffer has enable-multibyte-characters = nil, | 1436 | However, if the current buffer has enable-multibyte-characters = nil, |