changeset 66642:8e414fc88184

(byte-optimize-pure-func): Quote the folded value.
author Andreas Schwab <schwab@suse.de>
date Wed, 02 Nov 2005 22:18:32 +0000
parents eb497460d73a
children f8bbec917135
files lisp/emacs-lisp/byte-opt.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/byte-opt.el	Wed Nov 02 21:56:15 2005 +0000
+++ b/lisp/emacs-lisp/byte-opt.el	Wed Nov 02 22:18:32 2005 +0000
@@ -1135,7 +1135,7 @@
 	  (setq constant nil))
       (setq args (cdr args)))
     (if constant
-	(cons 'quote (eval form))
+	(list 'quote (eval form))
       form)))
 
 ;; Avoid having to write forward-... with a negative arg for speed.