* *.h: Use SCM_NIMP(X) && in all the FOOP macros.
[bpt/guile.git] / libguile / stacks.c
index 8b2a2e6..2f56ea6 100644 (file)
@@ -233,7 +233,7 @@ get_applybody ()
 }
 
 #define NEXT_FRAME(iframe, n, quit) \
-{ \
+do { \
   if (SCM_NIMP (iframe->source) \
       && SCM_MEMOIZED_EXP (iframe->source) == applybody) \
     { \
@@ -247,7 +247,7 @@ get_applybody ()
   ++iframe; \
   if (--n == 0) \
     goto quit; \
-} \
+} while (0)
 
 
 /* Fill the scm_info_frame vector IFRAME with data from N stack frames