From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 15 Nov 2000 19:24:35 +0000 (+0000)
Subject: (BINDING_STACK_SIZE): New macro.
X-Git-Tag: emacs-pretest-21.0.90~51
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=acb8dc441de3d40270c8fddb9b05710bc90e8828;p=emacs.git

(BINDING_STACK_SIZE): New macro.
---

diff --git a/src/lisp.h b/src/lisp.h
index 9e0a769d55c..4ea5dce5ddf 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1506,6 +1506,8 @@ extern struct specbinding *specpdl;
 extern struct specbinding *specpdl_ptr;
 extern int specpdl_size;
 
+#define BINDING_STACK_SIZE()	(specpdl_ptr - specpdl)
+
 /* Everything needed to describe an active condition case.  */
 struct handler
   {