diff options
| author | Andreas Schwab <schwab@suse.de> | 2005-11-02 22:18:56 +0000 |
|---|---|---|
| committer | Andreas Schwab <schwab@suse.de> | 2005-11-02 22:18:56 +0000 |
| commit | c80eca71953342d01e93f505d85bf2a0671e4d90 (patch) | |
| tree | f2582939dfc7e795455ac6fad39bdb3408eaf78c /lisp/emacs-lisp/byte-opt.el | |
| parent | 4cd305ac3392e312cc124b9b7c682e06e38e9ea6 (diff) | |
| download | emacs-c80eca71953342d01e93f505d85bf2a0671e4d90.tar.gz | |
(byte-optimize-pure-func): Quote the
folded value.
Diffstat (limited to 'lisp/emacs-lisp/byte-opt.el')
| -rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 1cda03ad0d5..8711a05e2d9 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -1135,7 +1135,7 @@ of FORM by signaling the error at compile-time." (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. |