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

(string-to-syntax): Mark it as pure.

Browse source
This commit is contained in:
Stefan Monnier 2005-11-02 19:03:17 +00:00
parent 8b9e43d1ce
commit cfa1d4c6d1
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -1121,6 +1121,7 @@
(put 'symbol-name 'byte-optimizer 'byte-optimize-pure-func)
(put 'regexp-opt 'byte-optimizer 'byte-optimize-pure-func)
(put 'regexp-quote 'byte-optimizer 'byte-optimize-pure-func)
(put 'string-to-syntax 'byte-optimizer 'byte-optimize-pure-func)
(defun byte-optimize-pure-func (form)
"Do constant folding for pure functions.
This assumes that the function will not have any side-effects and that