Remove pushmany! macro
It is redundant with prependq!, appendq! and pushnew!.
This commit is contained in:
parent
3d1569515b
commit
a567e2f85e
1 changed files with 0 additions and 7 deletions
|
@ -171,13 +171,6 @@ This is a variadic `cl-pushnew'."
|
||||||
`(dolist (,var (list ,@values))
|
`(dolist (,var (list ,@values))
|
||||||
(cl-pushnew ,var ,place))))
|
(cl-pushnew ,var ,place))))
|
||||||
|
|
||||||
(defmacro pushmany! (place &rest values)
|
|
||||||
"Push VALUES sequentually into PLACE.
|
|
||||||
This is a variadic `push'."
|
|
||||||
(let ((var (make-symbol "result")))
|
|
||||||
`(dolist (,var ,values)
|
|
||||||
(push ,var ,place))))
|
|
||||||
|
|
||||||
(defmacro prependq! (sym &rest lists)
|
(defmacro prependq! (sym &rest lists)
|
||||||
"Prepend LISTS to SYM in place."
|
"Prepend LISTS to SYM in place."
|
||||||
`(setq ,sym (append ,@lists ,sym)))
|
`(setq ,sym (append ,@lists ,sym)))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue