diff options
author | Torbjorn Granlund <tege@gmplib.org> | 2009-06-28 21:06:52 +0200 |
---|---|---|
committer | Torbjorn Granlund <tege@gmplib.org> | 2009-06-28 21:06:52 +0200 |
commit | a7d6fb5821ad72f3b642a401e2b82dd387391120 (patch) | |
tree | 6911896d4bd58629767bdcd6c3a58dc69cff6970 /mpf | |
parent | d9e8664b109d52c0b45d7b89acbe2a9b44798c51 (diff) | |
download | gmp-a7d6fb5821ad72f3b642a401e2b82dd387391120.tar.gz |
Add mpz_clears, mpq_clears, mpf_clears.
Diffstat (limited to 'mpf')
-rw-r--r-- | mpf/Makefile.am | 4 | ||||
-rw-r--r-- | mpf/clears.c | 56 |
2 files changed, 58 insertions, 2 deletions
diff --git a/mpf/Makefile.am b/mpf/Makefile.am index efb97b6e3..4285e0b65 100644 --- a/mpf/Makefile.am +++ b/mpf/Makefile.am @@ -24,8 +24,8 @@ INCLUDES = -D__GMP_WITHIN_GMP -I$(top_srcdir) noinst_LTLIBRARIES = libmpf.la libmpf_la_SOURCES = \ init.c init2.c inits.c set.c set_ui.c set_si.c set_str.c set_d.c set_z.c \ - set_q.c iset.c iset_ui.c iset_si.c iset_str.c iset_d.c clear.c get_str.c \ - dump.c size.c eq.c reldiff.c sqrt.c random2.c inp_str.c out_str.c \ + set_q.c iset.c iset_ui.c iset_si.c iset_str.c iset_d.c clear.c clears.c \ + get_str.c dump.c size.c eq.c reldiff.c sqrt.c random2.c inp_str.c out_str.c \ add.c add_ui.c sub.c sub_ui.c ui_sub.c mul.c mul_ui.c div.c div_ui.c \ cmp.c cmp_d.c cmp_si.c cmp_ui.c mul_2exp.c div_2exp.c abs.c neg.c get_d.c \ get_d_2exp.c set_dfl_prec.c set_prc.c set_prc_raw.c get_dfl_prec.c get_prc.c \ diff --git a/mpf/clears.c b/mpf/clears.c new file mode 100644 index 000000000..8d43006c4 --- /dev/null +++ b/mpf/clears.c @@ -0,0 +1,56 @@ +/* mpf_clears() -- Clear multiple mpf_t variables. + +Copyright 2009 Free Software Foundation, Inc. + +This file is part of the GNU MP Library. + +The GNU MP Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 3 of the License, or (at your +option) any later version. + +The GNU MP Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the GNU MP Library. If not, see http://www.gnu.org/licenses/. */ + +#include "config.h" + +#if HAVE_STDARG +#include <stdarg.h> +#else +#include <varargs.h> +#endif + +#include <stdio.h> /* for NULL */ +#include "gmp.h" +#include "gmp-impl.h" + +void +#if HAVE_STDARG +mpf_clears (mpf_ptr x, ...) +#else +mpf_clears (va_alist) + va_dcl +#endif +{ + va_list ap; + +#if HAVE_STDARG + va_start (ap, x); +#else + mpf_ptr x; + va_start (ap); + x = va_arg (ap, mpf_ptr); +#endif + + while (x != NULL) + { + mpf_clear (x); + x = va_arg (ap, mpf_ptr); + } + va_end (ap); +} |