changeset 33600:c5f64497e92c

Use BINDING_STACK_SIZE throughout.
author Gerd Moellmann <gerd@gnu.org>
date Sat, 18 Nov 2000 21:05:19 +0000
parents ef784855566b
children 1ee8ea329b7b
files src/xdisp.c
diffstat 1 files changed, 10 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/src/xdisp.c	Sat Nov 18 15:51:00 2000 +0000
+++ b/src/xdisp.c	Sat Nov 18 21:05:19 2000 +0000
@@ -1221,7 +1221,7 @@
 safe_eval (sexpr)
      Lisp_Object sexpr;
 {
-  int count = specpdl_ptr - specpdl;
+  int count = BINDING_STACK_SIZE ();
   struct gcpro gcpro1;
   Lisp_Object val;
 
@@ -1241,7 +1241,7 @@
      int nargs;
      Lisp_Object *args;
 {
-  int count = specpdl_ptr - specpdl;
+  int count = BINDING_STACK_SIZE ();
   Lisp_Object val;
   struct gcpro gcpro1;
 
@@ -2012,7 +2012,7 @@
 	  prop = Fget_char_property (pos, Qfontified, Qnil),
 	  NILP (prop)))
     {
-      int count = specpdl_ptr - specpdl;
+      int count = BINDING_STACK_SIZE ();
       Lisp_Object val;
 
       val = Vfontification_functions;
@@ -2641,7 +2641,7 @@
 	      /* Evaluate IT->font_height with `height' bound to the
 		 current specified height to get the new height.  */
 	      Lisp_Object value;
-	      int count = specpdl_ptr - specpdl;
+	      int count = BINDING_STACK_SIZE ();
 	      
 	      specbind (Qheight, face->lface[LFACE_HEIGHT_INDEX]);
 	      value = safe_eval (it->font_height);
@@ -5785,7 +5785,7 @@
 {
   Lisp_Object buffer;
   int this_one, the_other, clear_buffer_p, rc;
-  int count = specpdl_ptr - specpdl;
+  int count = BINDING_STACK_SIZE ();
 
   /* If buffers aren't life, make new ones.  */
   ensure_echo_area_buffers ();
@@ -6810,7 +6810,7 @@
   if (all_windows)
     {
       Lisp_Object tail, frame;
-      int count = specpdl_ptr - specpdl;
+      int count = BINDING_STACK_SIZE ();
 
       record_unwind_protect (Fset_match_data, Fmatch_data (Qnil, Qnil));
 
@@ -6914,7 +6914,7 @@
 	      != !NILP (w->region_showing)))
 	{
 	  struct buffer *prev = current_buffer;
-	  int count = specpdl_ptr - specpdl;
+	  int count = BINDING_STACK_SIZE ();
 
 	  set_buffer_internal_1 (XBUFFER (w->buffer));
 	  if (save_match_data)
@@ -7006,7 +7006,7 @@
 	      != !NILP (w->region_showing)))
 	{
 	  struct buffer *prev = current_buffer;
-	  int count = specpdl_ptr - specpdl;
+	  int count = BINDING_STACK_SIZE ();
 
 	  /* Set current_buffer to the buffer of the selected
 	     window of the frame, so that we get the right local
@@ -7794,7 +7794,7 @@
 
   /* Record a function that resets redisplaying_p to its old value
      when we leave this function.  */
-  count = specpdl_ptr - specpdl;
+  count = BINDING_STACK_SIZE ();
   record_unwind_protect (unwind_redisplay, make_number (redisplaying_p));
   ++redisplaying_p;
   
@@ -9262,7 +9262,7 @@
   /* Record it now because it's overwritten.  */
   int current_matrix_up_to_date_p = 0;
   int temp_scroll_step = 0;
-  int count = specpdl_ptr - specpdl;
+  int count = BINDING_STACK_SIZE ();
   int rc;
 
   SET_TEXT_POS (lpoint, PT, PT_BYTE);