From: Kim F. Storm Date: Sun, 8 Sep 2002 20:28:46 +0000 (+0000) Subject: (executing_macro_index): Change type to EMACS_INT. X-Git-Tag: ttn-vms-21-2-B4~13327 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=64799df53a76c22f39c1b1c50b68b31d25bd0b39;p=emacs.git (executing_macro_index): Change type to EMACS_INT. (syms_of_macros): DEFVAR_INT it (needed by kmacro). --- diff --git a/src/macros.c b/src/macros.c index e9601b1aa7f..456a6e31fa3 100644 --- a/src/macros.c +++ b/src/macros.c @@ -35,7 +35,7 @@ Lisp_Object Vexecuting_macro; /* Index of next character to fetch from that macro. */ -int executing_macro_index; +EMACS_INT executing_macro_index; /* Number of successful iterations so far for innermost keyboard macro. @@ -380,6 +380,9 @@ syms_of_macros () DEFVAR_LISP ("executing-macro", &Vexecuting_macro, doc: /* Currently executing keyboard macro (string or vector); nil if none executing. */); + DEFVAR_INT ("executing-macro-index", &executing_macro_index, + doc: /* Index in currently executing keyboard macro; undefined if none executing. */); + DEFVAR_LISP_NOPRO ("executing-kbd-macro", &Vexecuting_macro, doc: /* Currently executing keyboard macro (string or vector); nil if none executing. */);