From: Paul Eggert <eggert@cs.ucla.edu>
Date: Tue, 30 Apr 2024 08:20:12 +0000 (-0700)
Subject: Pacify GCC 14 -Wclobbered in eval.c
X-Git-Tag: archive/raspbian/1%30.1+1-3+rpi1^2~2^2~20^2~1721
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=009a6ba71ea6741371e4799bdb475235a5b6da90;p=emacs.git

Pacify GCC 14 -Wclobbered in eval.c

* src/eval.c: Ignore -Wclobbered.
---

diff --git a/src/eval.c b/src/eval.c
index fd388706108..d3761c31f88 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1237,6 +1237,12 @@ usage: (catch TAG BODY...)  */)
   return internal_catch (tag, Fprogn, XCDR (args));
 }
 
+/* Work around GCC bug 61118
+   <https://gcc.gnu.org/bugzilla/show_bug.cgi?id=61118>.  */
+#if GNUC_PREREQ (4, 9, 0)
+# pragma GCC diagnostic ignored "-Wclobbered"
+#endif
+
 /* Assert that E is true, but do not evaluate E.  Use this instead of
    eassert (E) when E contains variables that might be clobbered by a
    longjmp.  */