From: Mattias Engdegård <mattiase@acm.org>
Date: Mon, 24 Jan 2022 14:02:17 +0000 (+0100)
Subject: ; * src/bytecode.c (exec_byte_code): Silence GCC warning
X-Git-Tag: emacs-29.0.90~2792
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=067e84116dde36a2e058e3915fe81c818a21e40a;p=emacs.git

; * src/bytecode.c (exec_byte_code): Silence GCC warning
---

diff --git a/src/bytecode.c b/src/bytecode.c
index 76ef2fb661c..da1855d6bab 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -381,7 +381,9 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth,
   Lisp_Object *stack_lim = top + stack_items;
   unsigned char const *bytestr_data = SDATA (bytestr);
   unsigned char const *pc = bytestr_data;
+#if BYTE_CODE_SAFE || !defined NDEBUG
   ptrdiff_t count = SPECPDL_INDEX ();
+#endif
 
   /* ARGS_TEMPLATE is composed of bit fields:
      bits 0..6    minimum number of arguments