summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-06-10 13:30:30 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-06-10 13:30:30 +0200
commit589ae02871bed3e062f6274f13a7a5eae417e8c4 (patch)
treefc24957f2335698a5ddad8cba5d160dbe960c1dc
parenta6cbf14a178fe3630c4c122f5a38f7d1c4ed1d13 (diff)
downloademacs-scratch/with-suppressed-warnings.tar.gz
Add comment about internal mapping symbolscratch/with-suppressed-warnings
-rw-r--r--lisp/emacs-lisp/bytecomp.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 9697d0d9cde..993300cda2a 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -514,6 +514,9 @@ Return the compile-time value of FORM."
expanded)))))
(with-suppressed-warnings
. ,(lambda (warnings &rest body)
+ ;; This function doesn't exist, but is just a placeholder
+ ;; symbol to hook up with the
+ ;; `byte-hunk-handler'/`byte-defop-compiler-1' machinery.
`(internal--with-suppressed-warnings
',warnings
,(macroexpand-all `(progn ,@body)