procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(edmacro-subseq): Don't use cl-push/cl-pop.

Browse source
This commit is contained in:
Stefan Monnier 2002-09-06 19:46:24 +00:00
parent 426f6c23f4
commit 3922343710
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/edmacro.el
View file

@ -595,7 +595,7 @@ If START or END is negative, it counts from the end."
(if end (if end
(let ((res nil)) (let ((res nil))
(while (>= (setq end (1- end)) start) (while (>= (setq end (1- end)) start)
(cl-push (cl-pop seq) res)) (push (pop seq) res))
(nreverse res)) (nreverse res))
(copy-sequence seq))) (copy-sequence seq)))
(t (t