Use macro SPECPDL_INDEX.

This commit is contained in:
Juanma Barranquero 2002-07-11 15:24:13 +00:00
parent 89297f2344
commit 65b2165811
2 changed files with 2 additions and 2 deletions

View file

@ -284,7 +284,7 @@ COUNT is a repeat count, or nil for once, or 0 for infinite loop. */)
{
Lisp_Object final;
Lisp_Object tem;
int pdlcount = specpdl_ptr - specpdl;
int pdlcount = SPECPDL_INDEX ();
int repeat = 1;
struct gcpro gcpro1;
int success_count = 0;

View file

@ -11605,7 +11605,7 @@ selection dialog's entry field, if MUSTMATCH is non-nil. */)
int ac = 0;
extern XtAppContext Xt_app_con;
XmString dir_xmstring, pattern_xmstring;
int count = specpdl_ptr - specpdl;
int count = SPECPDL_INDEX ();
struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5;
GCPRO5 (prompt, dir, default_filename, mustmatch, file);