aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2017-12-22 12:37:19 +0200
committerEli Zaretskii2017-12-22 12:37:19 +0200
commit34fcfc5c049bb99d68945bb24fb9d6a0789a33dd (patch)
tree53e034c59ba1a7a9a35712db169784e982d32d4a
parentf7a62c2b488ceb8c56cba1f44aec73f8c1108816 (diff)
downloademacs-34fcfc5c049bb99d68945bb24fb9d6a0789a33dd.tar.gz
emacs-34fcfc5c049bb99d68945bb24fb9d6a0789a33dd.zip
* lisp/emacs-lisp/inline.el (define-inline): Add a doc string.
-rw-r--r--lisp/emacs-lisp/inline.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/inline.el b/lisp/emacs-lisp/inline.el
index ff27158f836..b9f63c94474 100644
--- a/lisp/emacs-lisp/inline.el
+++ b/lisp/emacs-lisp/inline.el
@@ -124,6 +124,10 @@ After VARS is handled, BODY is evaluated in the new environment."
124 124
125;;;###autoload 125;;;###autoload
126(defmacro define-inline (name args &rest body) 126(defmacro define-inline (name args &rest body)
127 "Define an inline function NAME with arguments ARGS and body in BODY.
128
129This is like `defmacro', but has several advantages.
130See Info node `(elisp)Defining Functions' for more details."
127 ;; FIXME: How can this work with CL arglists? 131 ;; FIXME: How can this work with CL arglists?
128 (declare (indent defun) (debug defun) (doc-string 3)) 132 (declare (indent defun) (debug defun) (doc-string 3))
129 (let ((doc (if (stringp (car-safe body)) (list (pop body)))) 133 (let ((doc (if (stringp (car-safe body)) (list (pop body))))