* lisp/emacs-lisp/byte-opt.el (side-effect-free-fns): Add `make-byte-code'.

`make-byte-code' wraps `vector' doing some sanity check on the input
arguments.  `vector' is in side-effect-and-error-free-fns so add
`make-byte-code' to side-effect-free-fns.

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 62b82e4f32a3f6a4fe32d6af2ce24f6bf4b367ae..12bde8faf3921bd74da36aadb4518557f727ef37 100644 (file)
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1219,8 +1219,8 @@
         length line-beginning-position line-end-position
         local-variable-if-set-p local-variable-p locale-info
         log log10 logand logb logcount logior lognot logxor lsh
-        make-list make-string make-symbol marker-buffer max member memq min
-        minibuffer-selected-window minibuffer-window
+        make-byte-code make-list make-string make-symbol marker-buffer max
+        member memq min minibuffer-selected-window minibuffer-window
         mod multibyte-char-to-unibyte next-window nth nthcdr number-to-string
         parse-colon-path plist-get plist-member
         prefix-numeric-value previous-window prin1-to-string propertize