Commit 6a78f30f authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(define-setf-expander): Make it an

alias for define-setf-method.
parent c89e4bc5
......@@ -1432,6 +1432,7 @@ form. See `defsetf' for a simpler way to define most setf-methods."
(cl-pop body))))
(list (cl-transform-function-property
func 'setf-method (cons args body)))))
(defalias 'define-setf-expander 'define-setf-method)
(defmacro defsetf (func arg1 &rest args)
"(defsetf NAME FUNC): define a `setf' method.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment