X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=util%2Fsrc%2FTclTk%2Ftcl8.6.12%2Flibtommath%2Fbn_mp_clear_multi.c;fp=util%2Fsrc%2FTclTk%2Ftcl8.6.12%2Flibtommath%2Fbn_mp_clear_multi.c;h=794e45fa5c0f23f14a69aa1082a477205e7a1dbd;hb=c46db33a83894f24189046ef665713fe320fef71;hp=0000000000000000000000000000000000000000;hpb=542a195bc3d4acf4245305f6be3f1ca58d072076;p=eos%2Fbase.git

diff --git a/util/src/TclTk/tcl8.6.12/libtommath/bn_mp_clear_multi.c b/util/src/TclTk/tcl8.6.12/libtommath/bn_mp_clear_multi.c
new file mode 100644
index 0000000000..794e45fa5c
--- /dev/null
+++ b/util/src/TclTk/tcl8.6.12/libtommath/bn_mp_clear_multi.c
@@ -0,0 +1,19 @@
+#include "tommath_private.h"
+#ifdef BN_MP_CLEAR_MULTI_C
+/* LibTomMath, multiple-precision integer library -- Tom St Denis */
+/* SPDX-License-Identifier: Unlicense */
+
+#include <stdarg.h>
+
+void mp_clear_multi(mp_int *mp, ...)
+{
+   mp_int *next_mp = mp;
+   va_list args;
+   va_start(args, mp);
+   while (next_mp != NULL) {
+      mp_clear(next_mp);
+      next_mp = va_arg(args, mp_int *);
+   }
+   va_end(args);
+}
+#endif