Function: cl--defstruct-predicate

cl--defstruct-predicate is a byte-compiled function defined in cl-macs.el.gz.

Signature

(cl--defstruct-predicate TYPE)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/cl-macs.el.gz
(defun cl--defstruct-predicate (type)
  (let ((cons (assq (cl-struct-sequence-type type)
                    '((list . consp)
                      (vector . vectorp)
                      (nil . recordp)))))
    (if cons
        (cdr cons)
      'recordp)))