diff options
Diffstat (limited to 'src/callint.c')
-rw-r--r-- | src/callint.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/callint.c b/src/callint.c index 61ab4a3963e..5eb824b8c74 100644 --- a/src/callint.c +++ b/src/callint.c @@ -257,11 +257,11 @@ invoke it. If KEYS is omitted or nil, the return value of Lisp_Object teml; Lisp_Object up_event; Lisp_Object enable; - int speccount = SPECPDL_INDEX (); + ptrdiff_t speccount = SPECPDL_INDEX (); /* The index of the next element of this_command_keys to examine for the 'e' interactive code. */ - int next_event; + ptrdiff_t next_event; Lisp_Object prefix_arg; char *string; @@ -278,7 +278,7 @@ invoke it. If KEYS is omitted or nil, the return value of char *tem1; int arg_from_tty = 0; struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5; - int key_count; + ptrdiff_t key_count; int record_then_fail = 0; Lisp_Object save_this_command, save_last_command; @@ -584,7 +584,7 @@ invoke it. If KEYS is omitted or nil, the return value of case 'k': /* Key sequence. */ { - int speccount1 = SPECPDL_INDEX (); + ptrdiff_t speccount1 = SPECPDL_INDEX (); specbind (Qcursor_in_echo_area, Qt); /* Prompt in `minibuffer-prompt' face. */ Fput_text_property (make_number (0), @@ -616,7 +616,7 @@ invoke it. If KEYS is omitted or nil, the return value of case 'K': /* Key sequence to be defined. */ { - int speccount1 = SPECPDL_INDEX (); + ptrdiff_t speccount1 = SPECPDL_INDEX (); specbind (Qcursor_in_echo_area, Qt); /* Prompt in `minibuffer-prompt' face. */ Fput_text_property (make_number (0), |