diff options
Diffstat (limited to 'src')
| -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. */ |