From 65b21658119ab3b1ffab17f38709db33bcba2185 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Thu, 11 Jul 2002 15:24:13 +0000 Subject: [PATCH] Use macro SPECPDL_INDEX. --- src/macros.c | 2 +- src/xfns.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/macros.c b/src/macros.c index 82e305f8df3..5f6d83b52d6 100644 --- a/src/macros.c +++ b/src/macros.c @@ -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; diff --git a/src/xfns.c b/src/xfns.c index 912a2ceeb05..920b3b13a38 100644 --- a/src/xfns.c +++ b/src/xfns.c @@ -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); -- 2.39.2