# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 978444539 0
# Node ID c0953f8a8dffcf288e4bce0da822f7c0ee7cbbd5
# Parent  e90a76ca0b261fd359e6731540155a250c9e0906
(Fmarker_position): Remove unused variables `pos', `i',
and `buf'.
(Fmarker_insertion_type): Remove unused variable `buf'.

diff -r e90a76ca0b26 -r c0953f8a8dff src/marker.c
--- a/src/marker.c	Tue Jan 02 14:08:14 2001 +0000
+++ b/src/marker.c	Tue Jan 02 14:08:59 2001 +0000
@@ -450,10 +450,6 @@
   (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 @@
   (marker)
      register Lisp_Object marker;
 {
-  register Lisp_Object buf;
   CHECK_MARKER (marker, 0);
   return XMARKER (marker)->insertion_type ? Qt : Qnil;
 }