procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Constant-propagate (function SYMBOL)

Browse source 
* lisp/emacs-lisp/byte-opt.el (byte-optimize--substitutable-p):
Consider #'SYMBOL a constant for compile-time propagation purposes.
This commit is contained in:
Mattias Engdegård 2021-06-03 21:20:57 +02:00
parent a517b77ffe
commit 6b41d7da95
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/byte-opt.el
View file

@ -343,7 +343,7 @@ Same format as `byte-optimize--lexvars', with shared structure and contents.")
(numberp expr)
(stringp expr)
(and (consp expr)
(eq (car expr) 'quote)
(memq (car expr) '(quote function))
(symbolp (cadr expr)))
(keywordp expr)))