core-lib: refactor pushnew! macro
Do a little more work at expand-time.
This commit is contained in:
parent
3306eaa17c
commit
602e2f31c7
1 changed files with 2 additions and 2 deletions
|
@ -177,8 +177,8 @@ Accepts the same arguments as `message'."
|
|||
(defmacro pushnew! (place &rest values)
|
||||
"Like `cl-pushnew', but will prepend VALUES to PLACE.
|
||||
The order VALUES is preserved."
|
||||
`(dolist (--value-- (nreverse (list ,@values)))
|
||||
(cl-pushnew --value-- ,place)))
|
||||
`(dolist (--x-- (list ,@(nreverse values)))
|
||||
(cl-pushnew --x-- ,place)))
|
||||
|
||||
(defmacro prependq! (sym &rest lists)
|
||||
"Prepend LISTS to SYM in place."
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue