diff options
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/eval.c b/src/eval.c index a16d6c59809..6383a672ae3 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -89,7 +89,7 @@ Lisp_Object Vinternal_interpreter_environment; | |||
| 89 | 89 | ||
| 90 | /* Current number of specbindings allocated in specpdl. */ | 90 | /* Current number of specbindings allocated in specpdl. */ |
| 91 | 91 | ||
| 92 | int specpdl_size; | 92 | EMACS_INT specpdl_size; |
| 93 | 93 | ||
| 94 | /* Pointer to beginning of specpdl. */ | 94 | /* Pointer to beginning of specpdl. */ |
| 95 | 95 | ||
| @@ -105,7 +105,7 @@ EMACS_INT max_specpdl_size; | |||
| 105 | 105 | ||
| 106 | /* Depth in Lisp evaluations and function calls. */ | 106 | /* Depth in Lisp evaluations and function calls. */ |
| 107 | 107 | ||
| 108 | int lisp_eval_depth; | 108 | EMACS_INT lisp_eval_depth; |
| 109 | 109 | ||
| 110 | /* Maximum allowed depth in Lisp evaluations and function calls. */ | 110 | /* Maximum allowed depth in Lisp evaluations and function calls. */ |
| 111 | 111 | ||
| @@ -227,7 +227,7 @@ call_debugger (Lisp_Object arg) | |||
| 227 | int debug_while_redisplaying; | 227 | int debug_while_redisplaying; |
| 228 | int count = SPECPDL_INDEX (); | 228 | int count = SPECPDL_INDEX (); |
| 229 | Lisp_Object val; | 229 | Lisp_Object val; |
| 230 | int old_max = max_specpdl_size; | 230 | EMACS_INT old_max = max_specpdl_size; |
| 231 | 231 | ||
| 232 | /* Temporarily bump up the stack limits, | 232 | /* Temporarily bump up the stack limits, |
| 233 | so the debugger won't run out of stack. */ | 233 | so the debugger won't run out of stack. */ |
| @@ -2065,7 +2065,7 @@ void | |||
| 2065 | verror (const char *m, va_list ap) | 2065 | verror (const char *m, va_list ap) |
| 2066 | { | 2066 | { |
| 2067 | char buf[200]; | 2067 | char buf[200]; |
| 2068 | int size = 200; | 2068 | EMACS_INT size = 200; |
| 2069 | int mlen; | 2069 | int mlen; |
| 2070 | char *buffer = buf; | 2070 | char *buffer = buf; |
| 2071 | char *args[3]; | 2071 | char *args[3]; |
| @@ -2076,7 +2076,7 @@ verror (const char *m, va_list ap) | |||
| 2076 | 2076 | ||
| 2077 | while (1) | 2077 | while (1) |
| 2078 | { | 2078 | { |
| 2079 | int used; | 2079 | EMACS_INT used; |
| 2080 | used = doprnt (buffer, size, m, m + mlen, ap); | 2080 | used = doprnt (buffer, size, m, m + mlen, ap); |
| 2081 | if (used < size) | 2081 | if (used < size) |
| 2082 | break; | 2082 | break; |