From: Paul Eggert Date: Tue, 2 May 2017 22:04:54 +0000 (-0700) Subject: Use ptrdiff_t, not int, for stack sizes X-Git-Tag: emacs-26.0.90~521^2~481 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b867eb8ecf67e9fb8167d950316ba762ac561b1c;p=emacs.git Use ptrdiff_t, not int, for stack sizes * src/thread.c (invoke_thread_function): * src/xterm.c (x_cr_export_frames): Don’t assume SPECPDL_INDEX fits in ‘int’. --- diff --git a/src/thread.c b/src/thread.c index 9ea7e121a82..e3787971a53 100644 --- a/src/thread.c +++ b/src/thread.c @@ -664,7 +664,7 @@ DEFUN ("thread-yield", Fthread_yield, Sthread_yield, 0, 0, 0, static Lisp_Object invoke_thread_function (void) { - int count = SPECPDL_INDEX (); + ptrdiff_t count = SPECPDL_INDEX (); Ffuncall (1, ¤t_thread->function); return unbind_to (count, Qnil); diff --git a/src/xterm.c b/src/xterm.c index 3de1ffea900..e9068830f85 100644 --- a/src/xterm.c +++ b/src/xterm.c @@ -569,7 +569,7 @@ x_cr_export_frames (Lisp_Object frames, cairo_surface_type_t surface_type) int width, height; void (*surface_set_size_func) (cairo_surface_t *, double, double) = NULL; Lisp_Object acc = Qnil; - int count = SPECPDL_INDEX (); + ptrdiff_t count = SPECPDL_INDEX (); specbind (Qredisplay_dont_pause, Qt); redisplay_preserve_echo_area (31);