From 65b21658119ab3b1ffab17f38709db33bcba2185 Mon Sep 17 00:00:00 2001
From: Juanma Barranquero <lekktu@gmail.com>
Date: Thu, 11 Jul 2002 15:24:13 +0000
Subject: Use macro SPECPDL_INDEX.

---
 src/macros.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/macros.c')

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;
-- 
cgit v1.2.1