Function: eieio--class-slot-initarg

eieio--class-slot-initarg is a byte-compiled function defined in eieio.el.gz.

Signature

(eieio--class-slot-initarg CLASS SLOT)

Documentation

Fetch from CLASS, SLOT's :initarg.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/eieio.el.gz
(defun eieio--class-slot-initarg (class slot)
  "Fetch from CLASS, SLOT's :initarg."
  (cl-check-type class eieio--class)
  (let ((ia (eieio--class-initarg-tuples class))
	(f nil))
    (while (and ia (not f))
      (if (eq (cdr (car ia)) slot)
	  (setq f (car (car ia))))
      (setq ia (cdr ia)))
    f))