Function: treemacs--compare-tag-paths--inliner

treemacs--compare-tag-paths--inliner is a function defined in treemacs-tag-follow-mode.el.

Signature

(treemacs--compare-tag-paths--inliner INLINE--FORM P1 P2)

Source Code

;; Defined in ~/.emacs.d/elpa/treemacs-20251226.1307/treemacs-tag-follow-mode.el
;; Could not find source code, showing raw function object.
#[(inline--form p1 p2)
  ((ignore inline--form)
   (catch 'inline--just-use
     (let*
	 ((exp p1)
	  (p1 (if (macroexp-copyable-p exp) exp (make-symbol "p1")))
	  (body
	   (let*
	       ((exp p2)
		(p2
		 (if (macroexp-copyable-p exp) exp (make-symbol "p2")))
		(body
		 (list '<
		       (list '-> p1 (list 'cdar)
			     (list 'marker-position))
		       (list '-> p2 (list 'cdar)
			     (list 'marker-position)))))
	     (if (eq p2 exp) body
	       (macroexp-let* (list (list p2 exp)) body)))))
       (if (eq p1 exp) body (macroexp-let* (list (list p1 exp)) body)))))
  (t)]