Commit 4cd305ac authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(byte-optimize-pure-func): Quote the eval'd value so it's not re-eval'd.

parent 1c7c774b
......@@ -1135,7 +1135,7 @@ of FORM by signaling the error at compile-time."
(setq constant nil))
(setq args (cdr args)))
(if constant
(eval form)
(cons 'quote (eval form))
form)))
;; Avoid having to write forward-... with a negative arg for speed.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment