From: Karl Heuer Date: Tue, 9 Jan 1996 02:34:30 +0000 (+0000) Subject: (Fexecute_kbd_macro): Local var `pdlcount' renamed from X-Git-Tag: emacs-19.34~1766 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=52d9c1459d45ca1f37ba1a7c9baf159f34522a49;p=emacs.git (Fexecute_kbd_macro): Local var `pdlcount' renamed from `count' to remove collision with recently renamed argument. --- diff --git a/src/macros.c b/src/macros.c index cd1c79071c0..80e3025a9a8 100644 --- a/src/macros.c +++ b/src/macros.c @@ -208,13 +208,14 @@ COUNT is a repeat count, or nil for once, or 0 for infinite loop.") { Lisp_Object final; Lisp_Object tem; - int count = specpdl_ptr - specpdl; + int pdlcount = specpdl_ptr - specpdl; int repeat = 1; struct gcpro gcpro1; - if (!NILP (count)) - count = Fprefix_numeric_value (count), + if (!NILP (count)) { + count = Fprefix_numeric_value (count); repeat = XINT (count); + } final = indirect_function (macro); if (!STRINGP (final) && !VECTORP (final)) @@ -239,7 +240,7 @@ COUNT is a repeat count, or nil for once, or 0 for infinite loop.") && (STRINGP (Vexecuting_macro) || VECTORP (Vexecuting_macro))); UNGCPRO; - return unbind_to (count, Qnil); + return unbind_to (pdlcount, Qnil); } init_macros ()