From a0ccbcbddcdf0c7cb990341fd1b9947c08eaaa15 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sun, 28 Oct 2012 18:12:53 -0700 Subject: * lisp/emacs-lisp/cl.el (defsetf): Doc fix. --- lisp/emacs-lisp/cl.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/cl.el b/lisp/emacs-lisp/cl.el index 34beed0d9ef..a558e505e66 100644 --- a/lisp/emacs-lisp/cl.el +++ b/lisp/emacs-lisp/cl.el @@ -568,9 +568,9 @@ well for simple place forms. In the simple `defsetf' form, `setf's of the form (setf (NAME ARGS...) VAL) are transformed to function or macro calls of the form (FUNC ARGS... VAL). Example: - (cl-defsetf aref aset) + (defsetf aref aset) -Alternate form: (cl-defsetf NAME ARGLIST (STORE) BODY...). +Alternate form: (defsetf NAME ARGLIST (STORE) BODY...). Here, the above `setf' call is expanded by binding the argument forms ARGS according to ARGLIST, binding the value form VAL to STORE, then executing BODY, which must return a Lisp form that does the necessary `setf' operation. @@ -578,7 +578,7 @@ Actually, ARGLIST and STORE may be bound to temporary variables which are introduced automatically to preserve proper execution order of the arguments. Example: - (cl-defsetf nth (n x) (v) `(setcar (nthcdr ,n ,x) ,v)) + (defsetf nth (n x) (v) `(setcar (nthcdr ,n ,x) ,v)) \(fn NAME [FUNC | ARGLIST (STORE) BODY...])" (declare (debug -- cgit v1.2.3