Function: byte-compile--custom-declare-face

byte-compile--custom-declare-face is a byte-compiled function defined in bytecomp.el.gz.

Signature

(byte-compile--custom-declare-face FORM)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/bytecomp.el.gz
(defun byte-compile--custom-declare-face (form)
  (let ((kind (nth 0 form)) (name (nth 1 form)) (docs (nth 3 form)))
    (when (stringp docs)
      (let ((newdocs (byte-compile--docstring docs kind name)))
        (unless (eq docs newdocs)
          (setq form (byte-compile--list-with-n form 3 newdocs)))))
    (byte-compile-keep-pending form)))