X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fmacros.c;h=62fb350d655d13e30d1183def3369581dab4e56f;hb=eaeec525cfb6e8d422f408ff2f3bcb8702a8cf29;hp=a163241a7ac05480c3ec00844c5b590d73e2c7e0;hpb=669565bfdc5d704dfb1d5ac1a0ec01fb3615a1ae;p=chise%2Fxemacs-chise.git.1 diff --git a/src/macros.c b/src/macros.c index a163241..62fb350 100644 --- a/src/macros.c +++ b/src/macros.c @@ -179,7 +179,7 @@ store_kbd_macro_event (Lisp_Object event) void pop_kbd_macro_event (Lisp_Object event) { - if (NILP (Vexecuting_macro)) abort (); + if (NILP (Vexecuting_macro)) ABORT (); if (STRINGP (Vexecuting_macro) || VECTORP (Vexecuting_macro)) { @@ -257,7 +257,7 @@ Execute MACRO as string of editor command characters. If MACRO is a symbol, its function definition is used. COUNT is a repeat count, or nil for once, or 0 for infinite loop. */ - (macro, prefixarg)) + (macro, count)) { /* This function can GC */ Lisp_Object final; @@ -267,10 +267,10 @@ COUNT is a repeat count, or nil for once, or 0 for infinite loop. struct gcpro gcpro1; struct console *con = XCONSOLE (Vselected_console); - if (!NILP (prefixarg)) + if (!NILP (count)) { - prefixarg = Fprefix_numeric_value (prefixarg); - repeat = XINT (prefixarg); + count = Fprefix_numeric_value (count); + repeat = XINT (count); } final = indirect_function (macro, 1);