diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/subr.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index a80383467d3..5d94a2aa9ad 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -51,12 +51,12 @@ BODY should be a list of lisp expressions." ;; depend on backquote.el. (list 'function (cons 'lambda cdr))) -(defmacro push (value listname) - "Add VALUE to the list which is the value of LISTNAME. -This is equivalent to (setq LISTNAME (cons VALUE LISTNAME)). +(defmacro push (newelt listname) + "Add NEWELT to the list which is the value of LISTNAME. +This is equivalent to (setq LISTNAME (cons NEWELT LISTNAME)). LISTNAME must be a symbol." (list 'setq list - (list 'cons value list))) + (list 'cons newelt list))) (defmacro pop (listname) "Return the first element of LISTNAME's value, and remove it from the list. |