Mercurial > emacs
changeset 66639:4408f56ebb87
(string-to-syntax): Mark it as pure.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Wed, 02 Nov 2005 19:03:17 +0000 |
parents | 4ac8c6441408 |
children | eb72b7c5a0b9 |
files | lisp/emacs-lisp/byte-opt.el |
diffstat | 1 files changed, 1 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/byte-opt.el Wed Nov 02 17:33:28 2005 +0000 +++ b/lisp/emacs-lisp/byte-opt.el Wed Nov 02 19:03:17 2005 +0000 @@ -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