# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1031341584 0
# Node ID 15e9f75f55b06821e4d2c583ac1d68fafd05e3f0
# Parent  f6ebca93d96f64aa354da3522675ef875e7dddfa
(edmacro-subseq): Don't use cl-push/cl-pop.

diff -r f6ebca93d96f -r 15e9f75f55b0 lisp/edmacro.el
--- a/lisp/edmacro.el	Fri Sep 06 16:46:08 2002 +0000
+++ b/lisp/edmacro.el	Fri Sep 06 19:46:24 2002 +0000
@@ -595,7 +595,7 @@
 	     (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