Commit 3edc4fb5 authored by Eli Zaretskii's avatar Eli Zaretskii
Browse files

; * lisp/emacs-lisp/macroexp.el (macroexp-warn-and-return): Doc fix.

parent a8285573
Pipeline #11530 failed with stages
in 12 seconds
...@@ -146,11 +146,11 @@ Other uses risk returning non-nil value that point to the wrong file." ...@@ -146,11 +146,11 @@ Other uses risk returning non-nil value that point to the wrong file."
(define-obsolete-function-alias 'macroexp--warn-and-return (define-obsolete-function-alias 'macroexp--warn-and-return
#'macroexp-warn-and-return "28.1") #'macroexp-warn-and-return "28.1")
(defun macroexp-warn-and-return (msg form &optional category compile-only) (defun macroexp-warn-and-return (msg form &optional category compile-only)
"Return code equivalent to FORM by labeled with warning MSG. "Return code equivalent to FORM labeled with warning MSG.
CATEGORY is the category of the warning, like the categories that CATEGORY is the category of the warning, like the categories that
can appear in `byte-compile-warnings'. can appear in `byte-compile-warnings'.
COMPILE-ONLY if non-nil indicates that no warning should be emitted if COMPILE-ONLY non-nil means no warning should be emitted if the code
the code is executed without being compiled first." is executed without being compiled first."
(cond (cond
((null msg) form) ((null msg) form)
((macroexp-compiling-p) ((macroexp-compiling-p)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment