diff options
| author | Karl Heuer <kwzh@gnu.org> | 1996-01-09 02:34:30 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1996-01-09 02:34:30 +0000 |
| commit | d78a968f693da7deb4fe4503672abe1539736b5b (patch) | |
| tree | b8044f4745b09e58eac86a18dc251dc8bdf322a9 /src | |
| parent | 7500538661b0ee7223bd33fb3ecb71456a3942cf (diff) | |
| download | emacs-d78a968f693da7deb4fe4503672abe1539736b5b.tar.gz | |
(Fexecute_kbd_macro): Local var `pdlcount' renamed from
`count' to remove collision with recently renamed argument.
Diffstat (limited to 'src')
| -rw-r--r-- | src/macros.c | 9 |
1 files changed, 5 insertions, 4 deletions
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 () |