Function: byte-optimize-constant-args

byte-optimize-constant-args is a byte-compiled function defined in byte-opt.el.gz.

Signature

(byte-optimize-constant-args FORM)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/byte-opt.el.gz
(defun byte-optimize-constant-args (form)
  (let ((rest (cdr form)))
    (while (and rest (macroexp-const-p (car rest)))
      (setq rest (cdr rest)))
    (if rest
	form
      (condition-case ()
	  (list 'quote (eval form t))
	(error form)))))