Function: ad-body-forms

ad-body-forms is a byte-compiled function defined in advice.el.gz.

Signature

(ad-body-forms DEFINITION)

Documentation

Return the list of body forms of DEFINITION.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/advice.el.gz
(defun ad-body-forms (definition)
  "Return the list of body forms of DEFINITION."
  (cond ((ad-compiled-p definition)
	 nil)
	((consp definition)
	 (nthcdr (+ (if (ad-docstring definition) 1 0)
		    (if (ad-interactive-form definition) 1 0))
		 (cdr (cdr (ad-lambda-expression definition)))))))