(RETURN_UNGCPRO): Use if (1) .. else, not do ... while (0).

f3ca341e · Richard M. Stallman · aa138cb4 · f3ca341e
Commit f3ca341e authored Sep 19, 1994 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

src/lisp.h src/lisp.h +2 -2

No files found.
--- 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;