Function: dape--source-breakpoint-verified--inliner

dape--source-breakpoint-verified--inliner is a function defined in dape.el.

Signature

(dape--source-breakpoint-verified--inliner INLINE--FORM X)

Source Code

;; Defined in /nix/store/1fiaif8pifqj2jh65rbg3fkhg3i56q42-emacs-packages-deps/share/emacs/site-lisp/elpa/dape-0.27.1/dape.el
;; Could not find source code, showing raw function object.
#[(inline--form x)
  ((ignore inline--form)
   (catch 'inline--just-use
     (let*
	 ((exp x)
	  (x (if (macroexp-copyable-p exp) exp (make-symbol "x")))
	  (body
	   (list 'progn
		 (list 'or (list 'dape--source-breakpoint-p x)
		       (list 'signal
			     (list 'quote 'wrong-type-argument)
			     (list 'list
				   (list 'quote
					 'dape--source-breakpoint)
				   x)))
		 (list 'aref x 2))))
       (if (eq x exp) body (macroexp-let* (list (list x exp)) body)))))
  (cl-struct-dape--source-breakpoint-tags jotain-doc--kind-helpful
					  jotain-doc--sym-pkg
					  jotain-doc--face-syms
					  jotain-doc--var-syms
					  jotain-doc--fun-syms
					  jotain-doc--skipped
					  jotain-doc--pkg-dirs
					  jotain-doc--quick)]