Function: symset:create

symset:create is a byte-compiled function defined in hact.el.

Signature

(symset:create SYMBOL PROPERTY &rest SYMBOLS)

Documentation

Set SYMBOL's PROPERTY to a new symset created from any number of SyMBOLS.

If no SYMBOLS are given, set it to the empty set. Return the symset. Uses eq for comparison.

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hact.el
;;; ========================================================================
;;; symset class - Hyperbole internal ordered symbol sets
;;; ========================================================================

(defun    symset:create (symbol property &rest symbols)
  "Set SYMBOL's PROPERTY to a new symset created from any number of SyMBOLS.
If no SYMBOLS are given, set it to the empty set.  Return the symset.  Uses
`eq' for comparison."
  (let* ((set:equal-op 'eq)
	 (first (car symbols)))
    (when (and symbols first (listp first))
      (setq symbols first))
    (put symbol property (apply #'set:create symbols))))