core-lib: add nconcq! macro
This commit is contained in:
parent
e8ecf65cf9
commit
492f2dea1e
1 changed files with 4 additions and 0 deletions
|
@ -305,6 +305,10 @@ This is a variadic `push'."
|
||||||
"Append LISTS to SYM in place."
|
"Append LISTS to SYM in place."
|
||||||
`(setq ,sym (append ,sym ,@lists)))
|
`(setq ,sym (append ,sym ,@lists)))
|
||||||
|
|
||||||
|
(defmacro nconcq! (sym &rest lists)
|
||||||
|
"Append LISTS to SYM by altering them in place."
|
||||||
|
`(setq ,sym (nconc ,sym ,@lists)))
|
||||||
|
|
||||||
(defmacro delq! (elt list &optional fetcher)
|
(defmacro delq! (elt list &optional fetcher)
|
||||||
"Delete ELT from LIST in-place."
|
"Delete ELT from LIST in-place."
|
||||||
`(setq ,list
|
`(setq ,list
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue