diff options
| author | Paul Eggert | 2024-04-30 01:20:12 -0700 |
|---|---|---|
| committer | Paul Eggert | 2024-04-30 01:26:23 -0700 |
| commit | 009a6ba71ea6741371e4799bdb475235a5b6da90 (patch) | |
| tree | 8bcbb19c35d4e32415049e8d6017b76bd2ba3dd3 | |
| parent | 62c2afe84107de96b850c1da7a2b80bcab6e588a (diff) | |
| download | emacs-009a6ba71ea6741371e4799bdb475235a5b6da90.tar.gz emacs-009a6ba71ea6741371e4799bdb475235a5b6da90.zip | |
Pacify GCC 14 -Wclobbered in eval.c
* src/eval.c: Ignore -Wclobbered.
| -rw-r--r-- | src/eval.c | 6 |
1 files changed, 6 insertions, 0 deletions
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...) */) | |||
| 1237 | return internal_catch (tag, Fprogn, XCDR (args)); | 1237 | return internal_catch (tag, Fprogn, XCDR (args)); |
| 1238 | } | 1238 | } |
| 1239 | 1239 | ||
| 1240 | /* Work around GCC bug 61118 | ||
| 1241 | <https://gcc.gnu.org/bugzilla/show_bug.cgi?id=61118>. */ | ||
| 1242 | #if GNUC_PREREQ (4, 9, 0) | ||
| 1243 | # pragma GCC diagnostic ignored "-Wclobbered" | ||
| 1244 | #endif | ||
| 1245 | |||
| 1240 | /* Assert that E is true, but do not evaluate E. Use this instead of | 1246 | /* Assert that E is true, but do not evaluate E. Use this instead of |
| 1241 | eassert (E) when E contains variables that might be clobbered by a | 1247 | eassert (E) when E contains variables that might be clobbered by a |
| 1242 | longjmp. */ | 1248 | longjmp. */ |