unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* Rename loop variable in `src/eval.c's unwind_to_catch()
@ 2016-12-28  7:18 Chris Gregory
  0 siblings, 0 replies; only message in thread
From: Chris Gregory @ 2016-12-28  7:18 UTC (permalink / raw)
  To: emacs-devel

Change last_time to found_catch.  This more clearly expresses the
meaning of the loop, rather than just saying that this variable
controls when it breaks, which is obvious.
-- 
Chris Gregory

diff --git a/src/eval.c b/src/eval.c
index e50e26a..6c24e27 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1121,7 +1121,7 @@ internal_catch (Lisp_Object tag,
 static _Noreturn void
 unwind_to_catch (struct handler *catch, Lisp_Object value)
 {
-  bool last_time;
+  bool found_catch;
 
   eassert (catch->next);
 
@@ -1138,11 +1138,11 @@ unwind_to_catch (struct handler *catch, Lisp_Object value)
       /* Unwind the specpdl stack, and then restore the proper set of
 	 handlers.  */
       unbind_to (handlerlist->pdlcount, Qnil);
-      last_time = handlerlist == catch;
-      if (! last_time)
+      found_catch = handlerlist == catch;
+      if (! found_catch)
 	handlerlist = handlerlist->next;
     }
-  while (! last_time);
+  while (! found_catch);
 
   eassert (handlerlist == catch);
 



^ permalink raw reply related	[flat|nested] only message in thread

only message in thread, other threads:[~2016-12-28  7:18 UTC | newest]

Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2016-12-28  7:18 Rename loop variable in `src/eval.c's unwind_to_catch() Chris Gregory

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).