diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/xdisp.c | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/xdisp.c b/src/xdisp.c index 0fccd379492..cc875e59e7c 100644 --- a/src/xdisp.c +++ b/src/xdisp.c | |||
| @@ -1221,7 +1221,7 @@ Lisp_Object | |||
| 1221 | safe_eval (sexpr) | 1221 | safe_eval (sexpr) |
| 1222 | Lisp_Object sexpr; | 1222 | Lisp_Object sexpr; |
| 1223 | { | 1223 | { |
| 1224 | int count = specpdl_ptr - specpdl; | 1224 | int count = BINDING_STACK_SIZE (); |
| 1225 | struct gcpro gcpro1; | 1225 | struct gcpro gcpro1; |
| 1226 | Lisp_Object val; | 1226 | Lisp_Object val; |
| 1227 | 1227 | ||
| @@ -1241,7 +1241,7 @@ safe_call (nargs, args) | |||
| 1241 | int nargs; | 1241 | int nargs; |
| 1242 | Lisp_Object *args; | 1242 | Lisp_Object *args; |
| 1243 | { | 1243 | { |
| 1244 | int count = specpdl_ptr - specpdl; | 1244 | int count = BINDING_STACK_SIZE (); |
| 1245 | Lisp_Object val; | 1245 | Lisp_Object val; |
| 1246 | struct gcpro gcpro1; | 1246 | struct gcpro gcpro1; |
| 1247 | 1247 | ||
| @@ -2012,7 +2012,7 @@ handle_fontified_prop (it) | |||
| 2012 | prop = Fget_char_property (pos, Qfontified, Qnil), | 2012 | prop = Fget_char_property (pos, Qfontified, Qnil), |
| 2013 | NILP (prop))) | 2013 | NILP (prop))) |
| 2014 | { | 2014 | { |
| 2015 | int count = specpdl_ptr - specpdl; | 2015 | int count = BINDING_STACK_SIZE (); |
| 2016 | Lisp_Object val; | 2016 | Lisp_Object val; |
| 2017 | 2017 | ||
| 2018 | val = Vfontification_functions; | 2018 | val = Vfontification_functions; |
| @@ -2641,7 +2641,7 @@ handle_single_display_prop (it, prop, object, position) | |||
| 2641 | /* Evaluate IT->font_height with `height' bound to the | 2641 | /* Evaluate IT->font_height with `height' bound to the |
| 2642 | current specified height to get the new height. */ | 2642 | current specified height to get the new height. */ |
| 2643 | Lisp_Object value; | 2643 | Lisp_Object value; |
| 2644 | int count = specpdl_ptr - specpdl; | 2644 | int count = BINDING_STACK_SIZE (); |
| 2645 | 2645 | ||
| 2646 | specbind (Qheight, face->lface[LFACE_HEIGHT_INDEX]); | 2646 | specbind (Qheight, face->lface[LFACE_HEIGHT_INDEX]); |
| 2647 | value = safe_eval (it->font_height); | 2647 | value = safe_eval (it->font_height); |
| @@ -5785,7 +5785,7 @@ with_echo_area_buffer (w, which, fn, a1, a2, a3, a4) | |||
| 5785 | { | 5785 | { |
| 5786 | Lisp_Object buffer; | 5786 | Lisp_Object buffer; |
| 5787 | int this_one, the_other, clear_buffer_p, rc; | 5787 | int this_one, the_other, clear_buffer_p, rc; |
| 5788 | int count = specpdl_ptr - specpdl; | 5788 | int count = BINDING_STACK_SIZE (); |
| 5789 | 5789 | ||
| 5790 | /* If buffers aren't life, make new ones. */ | 5790 | /* If buffers aren't life, make new ones. */ |
| 5791 | ensure_echo_area_buffers (); | 5791 | ensure_echo_area_buffers (); |
| @@ -6810,7 +6810,7 @@ prepare_menu_bars () | |||
| 6810 | if (all_windows) | 6810 | if (all_windows) |
| 6811 | { | 6811 | { |
| 6812 | Lisp_Object tail, frame; | 6812 | Lisp_Object tail, frame; |
| 6813 | int count = specpdl_ptr - specpdl; | 6813 | int count = BINDING_STACK_SIZE (); |
| 6814 | 6814 | ||
| 6815 | record_unwind_protect (Fset_match_data, Fmatch_data (Qnil, Qnil)); | 6815 | record_unwind_protect (Fset_match_data, Fmatch_data (Qnil, Qnil)); |
| 6816 | 6816 | ||
| @@ -6914,7 +6914,7 @@ update_menu_bar (f, save_match_data) | |||
| 6914 | != !NILP (w->region_showing))) | 6914 | != !NILP (w->region_showing))) |
| 6915 | { | 6915 | { |
| 6916 | struct buffer *prev = current_buffer; | 6916 | struct buffer *prev = current_buffer; |
| 6917 | int count = specpdl_ptr - specpdl; | 6917 | int count = BINDING_STACK_SIZE (); |
| 6918 | 6918 | ||
| 6919 | set_buffer_internal_1 (XBUFFER (w->buffer)); | 6919 | set_buffer_internal_1 (XBUFFER (w->buffer)); |
| 6920 | if (save_match_data) | 6920 | if (save_match_data) |
| @@ -7006,7 +7006,7 @@ update_tool_bar (f, save_match_data) | |||
| 7006 | != !NILP (w->region_showing))) | 7006 | != !NILP (w->region_showing))) |
| 7007 | { | 7007 | { |
| 7008 | struct buffer *prev = current_buffer; | 7008 | struct buffer *prev = current_buffer; |
| 7009 | int count = specpdl_ptr - specpdl; | 7009 | int count = BINDING_STACK_SIZE (); |
| 7010 | 7010 | ||
| 7011 | /* Set current_buffer to the buffer of the selected | 7011 | /* Set current_buffer to the buffer of the selected |
| 7012 | window of the frame, so that we get the right local | 7012 | window of the frame, so that we get the right local |
| @@ -7794,7 +7794,7 @@ redisplay_internal (preserve_echo_area) | |||
| 7794 | 7794 | ||
| 7795 | /* Record a function that resets redisplaying_p to its old value | 7795 | /* Record a function that resets redisplaying_p to its old value |
| 7796 | when we leave this function. */ | 7796 | when we leave this function. */ |
| 7797 | count = specpdl_ptr - specpdl; | 7797 | count = BINDING_STACK_SIZE (); |
| 7798 | record_unwind_protect (unwind_redisplay, make_number (redisplaying_p)); | 7798 | record_unwind_protect (unwind_redisplay, make_number (redisplaying_p)); |
| 7799 | ++redisplaying_p; | 7799 | ++redisplaying_p; |
| 7800 | 7800 | ||
| @@ -9262,7 +9262,7 @@ redisplay_window (window, just_this_one_p) | |||
| 9262 | /* Record it now because it's overwritten. */ | 9262 | /* Record it now because it's overwritten. */ |
| 9263 | int current_matrix_up_to_date_p = 0; | 9263 | int current_matrix_up_to_date_p = 0; |
| 9264 | int temp_scroll_step = 0; | 9264 | int temp_scroll_step = 0; |
| 9265 | int count = specpdl_ptr - specpdl; | 9265 | int count = BINDING_STACK_SIZE (); |
| 9266 | int rc; | 9266 | int rc; |
| 9267 | 9267 | ||
| 9268 | SET_TEXT_POS (lpoint, PT, PT_BYTE); | 9268 | SET_TEXT_POS (lpoint, PT, PT_BYTE); |