Function: closql-oset

closql-oset is a byte-compiled function defined in closql.el.

Signature

(closql-oset OBJ SLOT VALUE)

Source Code

;; Defined in ~/.emacs.d/elpa/closql-20260101.1828/closql.el
(defun closql-oset (obj slot value)
  (cl-check-type slot symbol)
  (let ((class (eieio--object-class obj)))
    (cond-let
      ([c (eieio--slot-name-index class slot)]
       (eieio--validate-slot-value class c value slot)
       (when (and (not (eq slot 'closql-database))
                  (closql--oref obj 'closql-database))
         (closql-dset obj slot value))
       (aset obj c value))
      ([c (eieio--class-slot-name-index class slot)]
       (eieio--validate-class-slot-value class c value slot)
       (aset (eieio--class-class-allocation-values class) c value))
      ((slot-missing obj slot 'oset value)))))