Commit 4644f589 authored by Eli Zaretskii's avatar Eli Zaretskii

(Fmarker_position): Remove unused variables `pos', `i',

and `buf'.
(Fmarker_insertion_type): Remove unused variable `buf'.
parent 959064c4
......@@ -450,10 +450,6 @@ DEFUN ("marker-position", Fmarker_position, Smarker_position, 1, 1, 0,
(marker)
Lisp_Object marker;
{
register Lisp_Object pos;
register int i;
register struct buffer *buf;
CHECK_MARKER (marker, 0);
if (XMARKER (marker)->buffer)
return make_number (XMARKER (marker)->charpos);
......@@ -847,7 +843,6 @@ nil means the marker stays before text inserted there.")
(marker)
register Lisp_Object marker;
{
register Lisp_Object buf;
CHECK_MARKER (marker, 0);
return XMARKER (marker)->insertion_type ? Qt : Qnil;
}
......
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