Function: xref-push-marker-stack

xref-push-marker-stack is a byte-compiled function defined in xref.el.gz.

Signature

(xref-push-marker-stack &optional M)

Documentation

Add point M (defaults to point-marker) to the marker stack.

Erase the stack slots following this one.

Probably introduced at or before Emacs version 25.1.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/xref.el.gz
(defun xref-push-marker-stack (&optional m)
  "Add point M (defaults to `point-marker') to the marker stack.
Erase the stack slots following this one."
  (xref--push-backward (or m (point-marker)))
  (let ((history (xref--get-history)))
    (dolist (mk (cdr history))
      (set-marker mk nil nil))
    (setcdr history nil)))