[Emacs-diffs] Changes to emacs/src/fns.c

[Juanma Barranquero]

Index: emacs/src/fns.c
diff -c emacs/src/fns.c:1.315 emacs/src/fns.c:1.316
*** emacs/src/fns.c:1.315       Sun Jul  7 16:57:25 2002
--- emacs/src/fns.c     Thu Jul 11 10:11:43 2002
***************
*** 2935,2941 ****
    Lisp_Object xprompt;
    Lisp_Object args[2];
    struct gcpro gcpro1, gcpro2;
!   int count = specpdl_ptr - specpdl;
  
    specbind (Qcursor_in_echo_area, Qt);
  
--- 2935,2941 ----
    Lisp_Object xprompt;
    Lisp_Object args[2];
    struct gcpro gcpro1, gcpro2;
!   int count = SPECPDL_INDEX ();
  
    specbind (Qcursor_in_echo_area, Qt);
  
***************
*** 3250,3256 ****
    
    if (NILP (tem))
      {
!       int count = specpdl_ptr - specpdl;
        int nesting = 0;
  
        /* This is to make sure that loadup.el gives a clear picture
--- 3250,3256 ----
    
    if (NILP (tem))
      {
!       int count = SPECPDL_INDEX ();
        int nesting = 0;
  
        /* This is to make sure that loadup.el gives a clear picture