Commit 80e01f8d authored by Kenichi Handa's avatar Kenichi Handa

(Fposition_bytes): Declare arg POSITION as Lips_Object.

parent fa8a5a15
......@@ -458,6 +458,7 @@ is in effect, in which case it is less.")
DEFUN ("position-bytes", Fposition_bytes, Sposition_bytes, 1, 1, 0,
"Return the byte position for character position POSITION.")
(position)
Lisp_Object position;
{
CHECK_NUMBER_COERCE_MARKER (position, 1);
return make_number (CHAR_TO_BYTE (XINT (position)));
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment