Variable: advice--how-alist

advice--how-alist is a variable defined in nadvice.el.gz.

Value

Large value
((:around
  #[128 "\304\300\301#\207" [nil nil :around nil apply] 5 advice]
  "(lambda (&rest r) (apply FUNCTION OLDFUN r))")
 (:before
  #[128 "\304\300\"\210\304\301\"\207" [nil nil :before nil apply]
	4 advice]
  "(lambda (&rest r) (apply FUNCTION r) (apply OLDFUN r))")
 (:after
  #[128 "\304\301\"\304\300\"\210\207" [nil nil :after nil apply]
	5 advice]
  "(lambda (&rest r) (prog1 (apply OLDFUN r) (apply FUNCTION r)))")
 (:override
  #[128 "\304\300\"\207" [nil nil :override nil apply] 4 advice]
  "(lambda (&rest r) (apply FUNCTION r))")
 (:after-until
  #[128 "\304\301\"\206�\304\300\"\207"
	[nil nil :after-until nil apply] 4 advice]
  "(lambda (&rest r) (or (apply OLDFUN r) (apply FUNCTION r)))")
 (:after-while
  #[128 "\304\301\"\205�\304\300\"\207"
	[nil nil :after-while nil apply] 4 advice]
  "(lambda (&rest r) (and (apply OLDFUN r) (apply FUNCTION r)))")
 (:before-until
  #[128 "\304\300\"\206�\304\301\"\207"
	[nil nil :before-until nil apply] 4 advice]
  "(lambda (&rest r) (or (apply FUNCTION r) (apply OLDFUN r)))")
 (:before-while
  #[128 "\304\300\"\205�\304\301\"\207"
	[nil nil :before-while nil apply] 4 advice]
  "(lambda (&rest r) (and (apply FUNCTION r) (apply OLDFUN r)))")
 (:filter-args
  #[128 "\304\301\300!\"\207" [nil nil :filter-args nil apply] 5
	advice]
  "(lambda (&rest r) (apply OLDFUN (funcall FUNCTION r)))")
 (:filter-return
  #[128 "\300\304\301\"!\207" [nil nil :filter-return nil apply] 5
	advice]
  "(lambda (&rest r) (funcall FUNCTION (apply OLDFUN r)))"))

Documentation

List of descriptions of how to add a function.

Each element has the form (HOW OCL DOC) where HOW is a keyword, OCL is a "prototype" function of type advice, and DOC is a string where "FUNCTION" and "OLDFUN" are expected.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/nadvice.el.gz
;;;; Lightweight advice/hook
(defvar advice--how-alist
  (advice--make-how-alist
   (:around (apply car cdr r))
   (:before (apply car r) (apply cdr r))
   (:after (prog1 (apply cdr r) (apply car r)))
   (:override (apply car r))
   (:after-until (or (apply cdr r) (apply car r)))
   (:after-while (and (apply cdr r) (apply car r)))
   (:before-until (or (apply car r) (apply cdr r)))
   (:before-while (and (apply car r) (apply cdr r)))
   (:filter-args (apply cdr (funcall car r)))
   (:filter-return (funcall car (apply cdr r))))
  "List of descriptions of how to add a function.
Each element has the form (HOW OCL DOC) where HOW is a keyword,
OCL is a \"prototype\" function of type `advice', and
DOC is a string where \"FUNCTION\" and \"OLDFUN\" are expected.")