mp?/clears.c, mp?/inits.c: Stop supporting empty lists.

2 files changed, 4 insertions, 2 deletions

diff --git a/mpf/clears.c b/mpf/clears.c
index 68a4cbebd..17eca8208 100644
--- a/mpf/clears.c
+++ b/mpf/clears.c
@@ -39,11 +39,12 @@ mpf_clears (mpf_ptr x, ...)
 
   va_start (ap, x);
 
-  while (x != NULL)
+  do
     {
       __GMP_FREE_FUNC_LIMBS (PTR(x), PREC(x) + 1);
       x = va_arg (ap, mpf_ptr);
     }
+  while (x != NULL);
 
   va_end (ap);
 }
diff --git a/mpf/inits.c b/mpf/inits.c
index db7cacc42..ddcf1141a 100644
--- a/mpf/inits.c
+++ b/mpf/inits.c
@@ -39,11 +39,12 @@ mpf_inits (mpf_ptr x, ...)
 
   va_start (ap, x);
 
-  while (x != NULL)
+  do
     {
       mpf_init (x);
       x = va_arg (ap, mpf_ptr);
     }
+  while (x != NULL);
 
   va_end (ap);
 }