diff options
| author | Kenichi Handa <handa@m17n.org> | 1998-02-10 03:55:04 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1998-02-10 03:55:04 +0000 |
| commit | 3010fa5e2bef02fc3cf05d8b80b04c382c8c930e (patch) | |
| tree | cd68e45355e5effca3ab564b5e2e79818c971be0 | |
| parent | 25a8d82036ec1001f07c4ce20b91b37f2e52b492 (diff) | |
| download | emacs-3010fa5e2bef02fc3cf05d8b80b04c382c8c930e.tar.gz | |
(Fposition_bytes): Allow marker as arg POSITION. Use
XINT for type consistency.
| -rw-r--r-- | src/editfns.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/editfns.c b/src/editfns.c index 15398e57a60..1630888f446 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -459,8 +459,8 @@ DEFUN ("position-bytes", Fposition_bytes, Sposition_bytes, 1, 1, 0, "Return the byte position for character position POSITION.") (position) { - CHECK_NUMBER (position, 1); - return make_number (CHAR_TO_BYTE (position)); + CHECK_NUMBER_COERCE_MARKER (position, 1); + return make_number (CHAR_TO_BYTE (XINT (position))); } DEFUN ("following-char", Ffollowing_char, Sfollowing_char, 0, 0, 0, |