(byte-compile-constp): Include keywords.

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index a5b74d14741e32a5c3d907a5b0909ddea9d51ef1..6b6d79a2997ccfe5d46182c6ea1fc9f255594ed8 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1096,6 +1096,7 @@ otherwise pop it")
   ;; Returns non-nil if FORM is a constant.
   (` (cond ((consp (, form)) (eq (car (, form)) 'quote))
           ((not (symbolp (, form))))
+          ((keywordp (, form)))
           ((memq (, form) '(nil t))))))
 
 (defmacro byte-compile-close-variables (&rest body)