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

This commit is contained in:
Stefan Monnier 2002-09-06 19:46:24 +00:00
parent 426f6c23f4
commit 3922343710

View file

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