Function: gv-setter

gv-setter is a byte-compiled function defined in gv.el.gz.

Signature

(gv-setter NAME)

Documentation

Return the symbol where the (setf NAME) function should be placed.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/gv.el.gz
(defun gv-setter (name)
  ;; The name taken from Scheme's SRFI-17.  Actually, for SRFI-17, the argument
  ;; could/should be a function value rather than a symbol.
  "Return the symbol where the (setf NAME) function should be placed."
  (if (get name 'gv-expander)
      (error "gv-expander conflicts with (setf %S)" name))
  ;; FIXME: This is wrong if `name' is uninterned (or interned elsewhere).
  (intern (format "(setf %s)" name)))