From f3ca341e3c718e0e308d009153ef6dfcb3172fcb Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Mon, 19 Sep 1994 05:07:10 +0000
Subject: [PATCH] (RETURN_UNGCPRO): Use if (1) .. else, not do ... while (0).

---
 src/lisp.h | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/lisp.h b/src/lisp.h
index c2a06e4eb07..8fbc5345d32 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1095,14 +1095,14 @@ void staticpro();
 
 /* Evaluate expr, UNGCPRO, and then return the value of expr.  */
 #define RETURN_UNGCPRO(expr)			\
-do						\
+if (1)						\
     {						\
       Lisp_Object ret_ungc_val;			\
       ret_ungc_val = (expr);			\
       UNGCPRO;					\
       return ret_ungc_val;			\
     }						\
-while (1)
+else
 
 /* Defined in data.c */
 extern Lisp_Object Qnil, Qt, Qquote, Qlambda, Qsubr, Qunbound;
-- 
2.39.5