From 59aba93c21b9602bb29324581e67c03cede8bf88 Mon Sep 17 00:00:00 2001 From: Marco Bodrato Date: Mon, 14 Dec 2015 18:47:13 +0100 Subject: mp?/clears.c, mp?/inits.c: Stop supporting empty lists. --- mpq/clears.c | 3 ++- mpq/inits.c | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) (limited to 'mpq') diff --git a/mpq/clears.c b/mpq/clears.c index 73e5f6624..c5f6539a6 100644 --- a/mpq/clears.c +++ b/mpq/clears.c @@ -39,12 +39,13 @@ mpq_clears (mpq_ptr x, ...) va_start (ap, x); - while (x != NULL) + do { __GMP_FREE_FUNC_LIMBS (PTR(NUM(x)), ALLOC(NUM(x))); __GMP_FREE_FUNC_LIMBS (PTR(DEN(x)), ALLOC(DEN(x))); x = va_arg (ap, mpq_ptr); } + while (x != NULL); va_end (ap); } diff --git a/mpq/inits.c b/mpq/inits.c index bb14f93e2..084c71e00 100644 --- a/mpq/inits.c +++ b/mpq/inits.c @@ -39,11 +39,12 @@ mpq_inits (mpq_ptr x, ...) va_start (ap, x); - while (x != NULL) + do { mpq_init (x); x = va_arg (ap, mpq_ptr); } + while (x != NULL); va_end (ap); } -- cgit v1.2.1