diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2002-07-11 14:18:02 +0000 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2002-07-11 14:18:02 +0000 |
commit | aed13378308fae471bf2c11870a456e457166c31 (patch) | |
tree | 89ee2f5aaffc88a04531e85b1c1da979f17483f2 /src/fns.c | |
parent | e20b31732ad01d8de7605ea740525dedc3dbdb90 (diff) | |
download | emacs-aed13378308fae471bf2c11870a456e457166c31.tar.gz |
Use macro SPECPDL_INDEX.
Diffstat (limited to 'src/fns.c')
-rw-r--r-- | src/fns.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fns.c b/src/fns.c index 83e7353eb98..01d368ba3d3 100644 --- a/src/fns.c +++ b/src/fns.c @@ -2935,7 +2935,7 @@ is nil and `use-dialog-box' is non-nil. */) Lisp_Object xprompt; Lisp_Object args[2]; struct gcpro gcpro1, gcpro2; - int count = specpdl_ptr - specpdl; + int count = SPECPDL_INDEX (); specbind (Qcursor_in_echo_area, Qt); @@ -3250,7 +3250,7 @@ The normal messages at start and end of loading FILENAME are suppressed. */) if (NILP (tem)) { - int count = specpdl_ptr - specpdl; + int count = SPECPDL_INDEX (); int nesting = 0; /* This is to make sure that loadup.el gives a clear picture |