diff options
| author | Andrea Corallo | 2020-06-07 15:09:38 +0200 |
|---|---|---|
| committer | Andrea Corallo | 2020-06-07 19:49:43 +0200 |
| commit | 53fba73ff2599d2e5f06927d474311dc987a4c4d (patch) | |
| tree | db55f560e9abbd04a3f9f2a0c8ab11c8f6ef278e | |
| parent | e42e98ec0b90c36c43ac7ff99a2548bc8b746197 (diff) | |
| download | emacs-53fba73ff2599d2e5f06927d474311dc987a4c4d.tar.gz emacs-53fba73ff2599d2e5f06927d474311dc987a4c4d.zip | |
* 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.
| -rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 62b82e4f32a..12bde8faf39 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el | |||
| @@ -1219,8 +1219,8 @@ | |||
| 1219 | length line-beginning-position line-end-position | 1219 | length line-beginning-position line-end-position |
| 1220 | local-variable-if-set-p local-variable-p locale-info | 1220 | local-variable-if-set-p local-variable-p locale-info |
| 1221 | log log10 logand logb logcount logior lognot logxor lsh | 1221 | log log10 logand logb logcount logior lognot logxor lsh |
| 1222 | make-list make-string make-symbol marker-buffer max member memq min | 1222 | make-byte-code make-list make-string make-symbol marker-buffer max |
| 1223 | minibuffer-selected-window minibuffer-window | 1223 | member memq min minibuffer-selected-window minibuffer-window |
| 1224 | mod multibyte-char-to-unibyte next-window nth nthcdr number-to-string | 1224 | mod multibyte-char-to-unibyte next-window nth nthcdr number-to-string |
| 1225 | parse-colon-path plist-get plist-member | 1225 | parse-colon-path plist-get plist-member |
| 1226 | prefix-numeric-value previous-window prin1-to-string propertize | 1226 | prefix-numeric-value previous-window prin1-to-string propertize |