[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master c22cf4d 4/5: Pacify gcc 11.1.1 -Wclobbered
From: |
Paul Eggert |
Subject: |
master c22cf4d 4/5: Pacify gcc 11.1.1 -Wclobbered |
Date: |
Mon, 12 Jul 2021 03:12:30 -0400 (EDT) |
branch: master
commit c22cf4d02ff7ebd85839aac5336f6e279f32db54
Author: Paul Eggert <eggert@cs.ucla.edu>
Commit: Paul Eggert <eggert@cs.ucla.edu>
Pacify gcc 11.1.1 -Wclobbered
* src/eval.c (Fprogn, internal_lisp_condition_case):
Add CACHEABLE to work around more instances of -Wclobbered bug.
---
src/eval.c | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/src/eval.c b/src/eval.c
index 18faa0b..b76ced7 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -462,7 +462,7 @@ DEFUN ("progn", Fprogn, Sprogn, 0, UNEVALLED, 0,
usage: (progn BODY...) */)
(Lisp_Object body)
{
- Lisp_Object val = Qnil;
+ Lisp_Object CACHEABLE val = Qnil;
while (CONSP (body))
{
@@ -1429,7 +1429,7 @@ internal_lisp_condition_case (Lisp_Object var,
Lisp_Object bodyform,
}
}
- Lisp_Object result = eval_sub (bodyform);
+ Lisp_Object CACHEABLE result = eval_sub (bodyform);
handlerlist = oldhandlerlist;
if (!NILP (success_handler))
{