diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-10 13:30:30 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-10 13:30:30 +0200 |
commit | 589ae02871bed3e062f6274f13a7a5eae417e8c4 (patch) | |
tree | fc24957f2335698a5ddad8cba5d160dbe960c1dc | |
parent | a6cbf14a178fe3630c4c122f5a38f7d1c4ed1d13 (diff) | |
download | emacs-scratch/with-suppressed-warnings.tar.gz |
Add comment about internal mapping symbolscratch/with-suppressed-warnings
-rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 3 |
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) |