1 files changed, 2 insertions, 0 deletions

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 6f653c8fc6e..ebe490fb229 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -276,6 +276,8 @@
               ;; Isn't it an error for `string' not to be unibyte??  --stef
               (if (fboundp 'string-as-unibyte)
                   (setq string (string-as-unibyte string)))
+              ;; `byte-compile-splice-in-already-compiled-code'
+              ;; takes care of inlining the body.
               (cons `(lambda ,(aref fn 0)
                        (byte-code ,string ,(aref fn 2) ,(aref fn 3)))
                     (cdr form)))