* tools/genStubs.tcl: Updated script to no longer produce the

        _ANSI_ARGS_ wrapper in generated declarations.  Also revised to
        accept variadic prototypes with more than one fixed argument.
        (This is possible since TCL_VARARGS and its limitations are no
        longer in use).
        * generic/tcl.h:        Some reordering so that macro definitions
        do not interfere with the now _ANSI_ARGS_-less stub declarations.

        * generic/tclDecls.h:           make genstubs
        * generic/tclIntDecls.h:
        * generic/tclIntPlatDecls.h:
        * generic/tclPlatDecls.h:
        * generic/tclTomMathDecls.h:

1 files changed, 133 insertions, 154 deletions

diff --git a/generic/tclTomMathDecls.h b/generic/tclTomMathDecls.h
index 598f3f7..785c61b 100644
--- a/generic/tclTomMathDecls.h
+++ b/generic/tclTomMathDecls.h
@@ -11,7 +11,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclTomMathDecls.h,v 1.1 2005/12/13 22:43:18 kennykb Exp $
+ * RCS: @(#) $Id: tclTomMathDecls.h,v 1.2 2006/11/15 14:58:27 dgp Exp $
  */
 
 #ifndef _TCLTOMMATHDECLS
@@ -140,405 +140,384 @@
 #ifndef TclBN_epoch_TCL_DECLARED
 #define TclBN_epoch_TCL_DECLARED
 /* 0 */
-EXTERN int		TclBN_epoch _ANSI_ARGS_((void));
+EXTERN int		TclBN_epoch (void);
 #endif
 #ifndef TclBN_revision_TCL_DECLARED
 #define TclBN_revision_TCL_DECLARED
 /* 1 */
-EXTERN int		TclBN_revision _ANSI_ARGS_((void));
+EXTERN int		TclBN_revision (void);
 #endif
 #ifndef TclBN_mp_add_TCL_DECLARED
 #define TclBN_mp_add_TCL_DECLARED
 /* 2 */
-EXTERN int		TclBN_mp_add _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* c));
+EXTERN int		TclBN_mp_add (mp_int* a, mp_int* b, mp_int* c);
 #endif
 #ifndef TclBN_mp_add_d_TCL_DECLARED
 #define TclBN_mp_add_d_TCL_DECLARED
 /* 3 */
-EXTERN int		TclBN_mp_add_d _ANSI_ARGS_((mp_int* a, mp_digit b, 
-				mp_int* c));
+EXTERN int		TclBN_mp_add_d (mp_int* a, mp_digit b, mp_int* c);
 #endif
 #ifndef TclBN_mp_and_TCL_DECLARED
 #define TclBN_mp_and_TCL_DECLARED
 /* 4 */
-EXTERN int		TclBN_mp_and _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* c));
+EXTERN int		TclBN_mp_and (mp_int* a, mp_int* b, mp_int* c);
 #endif
 #ifndef TclBN_mp_clamp_TCL_DECLARED
 #define TclBN_mp_clamp_TCL_DECLARED
 /* 5 */
-EXTERN void		TclBN_mp_clamp _ANSI_ARGS_((mp_int* a));
+EXTERN void		TclBN_mp_clamp (mp_int* a);
 #endif
 #ifndef TclBN_mp_clear_TCL_DECLARED
 #define TclBN_mp_clear_TCL_DECLARED
 /* 6 */
-EXTERN void		TclBN_mp_clear _ANSI_ARGS_((mp_int* a));
+EXTERN void		TclBN_mp_clear (mp_int* a);
 #endif
 #ifndef TclBN_mp_clear_multi_TCL_DECLARED
 #define TclBN_mp_clear_multi_TCL_DECLARED
 /* 7 */
-EXTERN void		TclBN_mp_clear_multi _ANSI_ARGS_((mp_int*a, ...));
+EXTERN void		TclBN_mp_clear_multi (mp_int* a, ...);
 #endif
 #ifndef TclBN_mp_cmp_TCL_DECLARED
 #define TclBN_mp_cmp_TCL_DECLARED
 /* 8 */
-EXTERN int		TclBN_mp_cmp _ANSI_ARGS_((mp_int* a, mp_int* b));
+EXTERN int		TclBN_mp_cmp (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_mp_cmp_d_TCL_DECLARED
 #define TclBN_mp_cmp_d_TCL_DECLARED
 /* 9 */
-EXTERN int		TclBN_mp_cmp_d _ANSI_ARGS_((mp_int* a, mp_digit b));
+EXTERN int		TclBN_mp_cmp_d (mp_int* a, mp_digit b);
 #endif
 #ifndef TclBN_mp_cmp_mag_TCL_DECLARED
 #define TclBN_mp_cmp_mag_TCL_DECLARED
 /* 10 */
-EXTERN int		TclBN_mp_cmp_mag _ANSI_ARGS_((mp_int* a, mp_int* b));
+EXTERN int		TclBN_mp_cmp_mag (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_mp_copy_TCL_DECLARED
 #define TclBN_mp_copy_TCL_DECLARED
 /* 11 */
-EXTERN int		TclBN_mp_copy _ANSI_ARGS_((mp_int* a, mp_int* b));
+EXTERN int		TclBN_mp_copy (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_mp_count_bits_TCL_DECLARED
 #define TclBN_mp_count_bits_TCL_DECLARED
 /* 12 */
-EXTERN int		TclBN_mp_count_bits _ANSI_ARGS_((mp_int* a));
+EXTERN int		TclBN_mp_count_bits (mp_int* a);
 #endif
 #ifndef TclBN_mp_div_TCL_DECLARED
 #define TclBN_mp_div_TCL_DECLARED
 /* 13 */
-EXTERN int		TclBN_mp_div _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* q, mp_int* r));
+EXTERN int		TclBN_mp_div (mp_int* a, mp_int* b, mp_int* q, 
+				mp_int* r);
 #endif
 #ifndef TclBN_mp_div_d_TCL_DECLARED
 #define TclBN_mp_div_d_TCL_DECLARED
 /* 14 */
-EXTERN int		TclBN_mp_div_d _ANSI_ARGS_((mp_int* a, mp_digit b, 
-				mp_int* q, mp_digit* r));
+EXTERN int		TclBN_mp_div_d (mp_int* a, mp_digit b, mp_int* q, 
+				mp_digit* r);
 #endif
 #ifndef TclBN_mp_div_2_TCL_DECLARED
 #define TclBN_mp_div_2_TCL_DECLARED
 /* 15 */
-EXTERN int		TclBN_mp_div_2 _ANSI_ARGS_((mp_int* a, mp_int* q));
+EXTERN int		TclBN_mp_div_2 (mp_int* a, mp_int* q);
 #endif
 #ifndef TclBN_mp_div_2d_TCL_DECLARED
 #define TclBN_mp_div_2d_TCL_DECLARED
 /* 16 */
-EXTERN int		TclBN_mp_div_2d _ANSI_ARGS_((mp_int* a, int b, 
-				mp_int* q, mp_int* r));
+EXTERN int		TclBN_mp_div_2d (mp_int* a, int b, mp_int* q, 
+				mp_int* r);
 #endif
 #ifndef TclBN_mp_div_3_TCL_DECLARED
 #define TclBN_mp_div_3_TCL_DECLARED
 /* 17 */
-EXTERN int		TclBN_mp_div_3 _ANSI_ARGS_((mp_int* a, mp_int* q, 
-				mp_digit* r));
+EXTERN int		TclBN_mp_div_3 (mp_int* a, mp_int* q, mp_digit* r);
 #endif
 #ifndef TclBN_mp_exch_TCL_DECLARED
 #define TclBN_mp_exch_TCL_DECLARED
 /* 18 */
-EXTERN void		TclBN_mp_exch _ANSI_ARGS_((mp_int* a, mp_int* b));
+EXTERN void		TclBN_mp_exch (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_mp_expt_d_TCL_DECLARED
 #define TclBN_mp_expt_d_TCL_DECLARED
 /* 19 */
-EXTERN int		TclBN_mp_expt_d _ANSI_ARGS_((mp_int* a, mp_digit b, 
-				mp_int* c));
+EXTERN int		TclBN_mp_expt_d (mp_int* a, mp_digit b, mp_int* c);
 #endif
 #ifndef TclBN_mp_grow_TCL_DECLARED
 #define TclBN_mp_grow_TCL_DECLARED
 /* 20 */
-EXTERN int		TclBN_mp_grow _ANSI_ARGS_((mp_int* a, int size));
+EXTERN int		TclBN_mp_grow (mp_int* a, int size);
 #endif
 #ifndef TclBN_mp_init_TCL_DECLARED
 #define TclBN_mp_init_TCL_DECLARED
 /* 21 */
-EXTERN int		TclBN_mp_init _ANSI_ARGS_((mp_int* a));
+EXTERN int		TclBN_mp_init (mp_int* a);
 #endif
 #ifndef TclBN_mp_init_copy_TCL_DECLARED
 #define TclBN_mp_init_copy_TCL_DECLARED
 /* 22 */
-EXTERN int		TclBN_mp_init_copy _ANSI_ARGS_((mp_int * a, 
-				mp_int* b));
+EXTERN int		TclBN_mp_init_copy (mp_int * a, mp_int* b);
 #endif
 #ifndef TclBN_mp_init_multi_TCL_DECLARED
 #define TclBN_mp_init_multi_TCL_DECLARED
 /* 23 */
-EXTERN int		TclBN_mp_init_multi _ANSI_ARGS_((mp_int*a, ...));
+EXTERN int		TclBN_mp_init_multi (mp_int* a, ...);
 #endif
 #ifndef TclBN_mp_init_set_TCL_DECLARED
 #define TclBN_mp_init_set_TCL_DECLARED
 /* 24 */
-EXTERN int		TclBN_mp_init_set _ANSI_ARGS_((mp_int* a, mp_digit b));
+EXTERN int		TclBN_mp_init_set (mp_int* a, mp_digit b);
 #endif
 #ifndef TclBN_mp_init_size_TCL_DECLARED
 #define TclBN_mp_init_size_TCL_DECLARED
 /* 25 */
-EXTERN int		TclBN_mp_init_size _ANSI_ARGS_((mp_int* a, int size));
+EXTERN int		TclBN_mp_init_size (mp_int* a, int size);
 #endif
 #ifndef TclBN_mp_lshd_TCL_DECLARED
 #define TclBN_mp_lshd_TCL_DECLARED
 /* 26 */
-EXTERN int		TclBN_mp_lshd _ANSI_ARGS_((mp_int* a, int shift));
+EXTERN int		TclBN_mp_lshd (mp_int* a, int shift);
 #endif
 #ifndef TclBN_mp_mod_TCL_DECLARED
 #define TclBN_mp_mod_TCL_DECLARED
 /* 27 */
-EXTERN int		TclBN_mp_mod _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* r));
+EXTERN int		TclBN_mp_mod (mp_int* a, mp_int* b, mp_int* r);
 #endif
 #ifndef TclBN_mp_mod_2d_TCL_DECLARED
 #define TclBN_mp_mod_2d_TCL_DECLARED
 /* 28 */
-EXTERN int		TclBN_mp_mod_2d _ANSI_ARGS_((mp_int* a, int b, 
-				mp_int* r));
+EXTERN int		TclBN_mp_mod_2d (mp_int* a, int b, mp_int* r);
 #endif
 #ifndef TclBN_mp_mul_TCL_DECLARED
 #define TclBN_mp_mul_TCL_DECLARED
 /* 29 */
-EXTERN int		TclBN_mp_mul _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* p));
+EXTERN int		TclBN_mp_mul (mp_int* a, mp_int* b, mp_int* p);
 #endif
 #ifndef TclBN_mp_mul_d_TCL_DECLARED
 #define TclBN_mp_mul_d_TCL_DECLARED
 /* 30 */
-EXTERN int		TclBN_mp_mul_d _ANSI_ARGS_((mp_int* a, mp_digit b, 
-				mp_int* p));
+EXTERN int		TclBN_mp_mul_d (mp_int* a, mp_digit b, mp_int* p);
 #endif
 #ifndef TclBN_mp_mul_2_TCL_DECLARED
 #define TclBN_mp_mul_2_TCL_DECLARED
 /* 31 */
-EXTERN int		TclBN_mp_mul_2 _ANSI_ARGS_((mp_int* a, mp_int* p));
+EXTERN int		TclBN_mp_mul_2 (mp_int* a, mp_int* p);
 #endif
 #ifndef TclBN_mp_mul_2d_TCL_DECLARED
 #define TclBN_mp_mul_2d_TCL_DECLARED
 /* 32 */
-EXTERN int		TclBN_mp_mul_2d _ANSI_ARGS_((mp_int* a, int d, 
-				mp_int* p));
+EXTERN int		TclBN_mp_mul_2d (mp_int* a, int d, mp_int* p);
 #endif
 #ifndef TclBN_mp_neg_TCL_DECLARED
 #define TclBN_mp_neg_TCL_DECLARED
 /* 33 */
-EXTERN int		TclBN_mp_neg _ANSI_ARGS_((mp_int* a, mp_int* b));
+EXTERN int		TclBN_mp_neg (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_mp_or_TCL_DECLARED
 #define TclBN_mp_or_TCL_DECLARED
 /* 34 */
-EXTERN int		TclBN_mp_or _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* c));
+EXTERN int		TclBN_mp_or (mp_int* a, mp_int* b, mp_int* c);
 #endif
 #ifndef TclBN_mp_radix_size_TCL_DECLARED
 #define TclBN_mp_radix_size_TCL_DECLARED
 /* 35 */
-EXTERN int		TclBN_mp_radix_size _ANSI_ARGS_((mp_int* a, 
-				int radix, int* size));
+EXTERN int		TclBN_mp_radix_size (mp_int* a, int radix, int* size);
 #endif
 #ifndef TclBN_mp_read_radix_TCL_DECLARED
 #define TclBN_mp_read_radix_TCL_DECLARED
 /* 36 */
-EXTERN int		TclBN_mp_read_radix _ANSI_ARGS_((mp_int* a, 
-				const char* str, int radix));
+EXTERN int		TclBN_mp_read_radix (mp_int* a, const char* str, 
+				int radix);
 #endif
 #ifndef TclBN_mp_rshd_TCL_DECLARED
 #define TclBN_mp_rshd_TCL_DECLARED
 /* 37 */
-EXTERN void		TclBN_mp_rshd _ANSI_ARGS_((mp_int * a, int shift));
+EXTERN void		TclBN_mp_rshd (mp_int * a, int shift);
 #endif
 #ifndef TclBN_mp_shrink_TCL_DECLARED
 #define TclBN_mp_shrink_TCL_DECLARED
 /* 38 */
-EXTERN int		TclBN_mp_shrink _ANSI_ARGS_((mp_int* a));
+EXTERN int		TclBN_mp_shrink (mp_int* a);
 #endif
 #ifndef TclBN_mp_set_TCL_DECLARED
 #define TclBN_mp_set_TCL_DECLARED
 /* 39 */
-EXTERN void		TclBN_mp_set _ANSI_ARGS_((mp_int* a, mp_digit b));
+EXTERN void		TclBN_mp_set (mp_int* a, mp_digit b);
 #endif
 #ifndef TclBN_mp_sqr_TCL_DECLARED
 #define TclBN_mp_sqr_TCL_DECLARED
 /* 40 */
-EXTERN int		TclBN_mp_sqr _ANSI_ARGS_((mp_int* a, mp_int* b));
+EXTERN int		TclBN_mp_sqr (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_mp_sqrt_TCL_DECLARED
 #define TclBN_mp_sqrt_TCL_DECLARED
 /* 41 */
-EXTERN int		TclBN_mp_sqrt _ANSI_ARGS_((mp_int* a, mp_int* b));
+EXTERN int		TclBN_mp_sqrt (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_mp_sub_TCL_DECLARED
 #define TclBN_mp_sub_TCL_DECLARED
 /* 42 */
-EXTERN int		TclBN_mp_sub _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* c));
+EXTERN int		TclBN_mp_sub (mp_int* a, mp_int* b, mp_int* c);
 #endif
 #ifndef TclBN_mp_sub_d_TCL_DECLARED
 #define TclBN_mp_sub_d_TCL_DECLARED
 /* 43 */
-EXTERN int		TclBN_mp_sub_d _ANSI_ARGS_((mp_int* a, mp_digit b, 
-				mp_int* c));
+EXTERN int		TclBN_mp_sub_d (mp_int* a, mp_digit b, mp_int* c);
 #endif
 #ifndef TclBN_mp_to_unsigned_bin_TCL_DECLARED
 #define TclBN_mp_to_unsigned_bin_TCL_DECLARED
 /* 44 */
-EXTERN int		TclBN_mp_to_unsigned_bin _ANSI_ARGS_((mp_int* a, 
-				unsigned char* b));
+EXTERN int		TclBN_mp_to_unsigned_bin (mp_int* a, 
+				unsigned char* b);
 #endif
 #ifndef TclBN_mp_to_unsigned_bin_n_TCL_DECLARED
 #define TclBN_mp_to_unsigned_bin_n_TCL_DECLARED
 /* 45 */
-EXTERN int		TclBN_mp_to_unsigned_bin_n _ANSI_ARGS_((mp_int* a, 
-				unsigned char* b, unsigned long* outlen));
+EXTERN int		TclBN_mp_to_unsigned_bin_n (mp_int* a, 
+				unsigned char* b, unsigned long* outlen);
 #endif
 #ifndef TclBN_mp_toradix_n_TCL_DECLARED
 #define TclBN_mp_toradix_n_TCL_DECLARED
 /* 46 */
-EXTERN int		TclBN_mp_toradix_n _ANSI_ARGS_((mp_int* a, char* str, 
-				int radix, int maxlen));
+EXTERN int		TclBN_mp_toradix_n (mp_int* a, char* str, int radix, 
+				int maxlen);
 #endif
 #ifndef TclBN_mp_unsigned_bin_size_TCL_DECLARED
 #define TclBN_mp_unsigned_bin_size_TCL_DECLARED
 /* 47 */
-EXTERN int		TclBN_mp_unsigned_bin_size _ANSI_ARGS_((mp_int* a));
+EXTERN int		TclBN_mp_unsigned_bin_size (mp_int* a);
 #endif
 #ifndef TclBN_mp_xor_TCL_DECLARED
 #define TclBN_mp_xor_TCL_DECLARED
 /* 48 */
-EXTERN int		TclBN_mp_xor _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* c));
+EXTERN int		TclBN_mp_xor (mp_int* a, mp_int* b, mp_int* c);
 #endif
 #ifndef TclBN_mp_zero_TCL_DECLARED
 #define TclBN_mp_zero_TCL_DECLARED
 /* 49 */
-EXTERN void		TclBN_mp_zero _ANSI_ARGS_((mp_int* a));
+EXTERN void		TclBN_mp_zero (mp_int* a);
 #endif
 #ifndef TclBN_reverse_TCL_DECLARED
 #define TclBN_reverse_TCL_DECLARED
 /* 50 */
-EXTERN void		TclBN_reverse _ANSI_ARGS_((unsigned char* s, int len));
+EXTERN void		TclBN_reverse (unsigned char* s, int len);
 #endif
 #ifndef TclBN_fast_s_mp_mul_digs_TCL_DECLARED
 #define TclBN_fast_s_mp_mul_digs_TCL_DECLARED
 /* 51 */
-EXTERN int		TclBN_fast_s_mp_mul_digs _ANSI_ARGS_((mp_int * a, 
-				mp_int * b, mp_int * c, int digs));
+EXTERN int		TclBN_fast_s_mp_mul_digs (mp_int * a, mp_int * b, 
+				mp_int * c, int digs);
 #endif
 #ifndef TclBN_fast_s_mp_sqr_TCL_DECLARED
 #define TclBN_fast_s_mp_sqr_TCL_DECLARED
 /* 52 */
-EXTERN int		TclBN_fast_s_mp_sqr _ANSI_ARGS_((mp_int* a, 
-				mp_int* b));
+EXTERN int		TclBN_fast_s_mp_sqr (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_mp_karatsuba_mul_TCL_DECLARED
 #define TclBN_mp_karatsuba_mul_TCL_DECLARED
 /* 53 */
-EXTERN int		TclBN_mp_karatsuba_mul _ANSI_ARGS_((mp_int* a, 
-				mp_int* b, mp_int* c));
+EXTERN int		TclBN_mp_karatsuba_mul (mp_int* a, mp_int* b, 
+				mp_int* c);
 #endif
 #ifndef TclBN_mp_karatsuba_sqr_TCL_DECLARED
 #define TclBN_mp_karatsuba_sqr_TCL_DECLARED
 /* 54 */
-EXTERN int		TclBN_mp_karatsuba_sqr _ANSI_ARGS_((mp_int* a, 
-				mp_int* b));
+EXTERN int		TclBN_mp_karatsuba_sqr (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_mp_toom_mul_TCL_DECLARED
 #define TclBN_mp_toom_mul_TCL_DECLARED
 /* 55 */
-EXTERN int		TclBN_mp_toom_mul _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* c));
+EXTERN int		TclBN_mp_toom_mul (mp_int* a, mp_int* b, mp_int* c);
 #endif
 #ifndef TclBN_mp_toom_sqr_TCL_DECLARED
 #define TclBN_mp_toom_sqr_TCL_DECLARED
 /* 56 */
-EXTERN int		TclBN_mp_toom_sqr _ANSI_ARGS_((mp_int* a, mp_int* b));
+EXTERN int		TclBN_mp_toom_sqr (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_s_mp_add_TCL_DECLARED
 #define TclBN_s_mp_add_TCL_DECLARED
 /* 57 */
-EXTERN int		TclBN_s_mp_add _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* c));
+EXTERN int		TclBN_s_mp_add (mp_int* a, mp_int* b, mp_int* c);
 #endif
 #ifndef TclBN_s_mp_mul_digs_TCL_DECLARED
 #define TclBN_s_mp_mul_digs_TCL_DECLARED
 /* 58 */
-EXTERN int		TclBN_s_mp_mul_digs _ANSI_ARGS_((mp_int* a, 
-				mp_int* b, mp_int* c, int digs));
+EXTERN int		TclBN_s_mp_mul_digs (mp_int* a, mp_int* b, mp_int* c, 
+				int digs);
 #endif
 #ifndef TclBN_s_mp_sqr_TCL_DECLARED
 #define TclBN_s_mp_sqr_TCL_DECLARED
 /* 59 */
-EXTERN int		TclBN_s_mp_sqr _ANSI_ARGS_((mp_int* a, mp_int* b));
+EXTERN int		TclBN_s_mp_sqr (mp_int* a, mp_int* b);
 #endif
 #ifndef TclBN_s_mp_sub_TCL_DECLARED
 #define TclBN_s_mp_sub_TCL_DECLARED
 /* 60 */
-EXTERN int		TclBN_s_mp_sub _ANSI_ARGS_((mp_int* a, mp_int* b, 
-				mp_int* c));
+EXTERN int		TclBN_s_mp_sub (mp_int* a, mp_int* b, mp_int* c);
 #endif
 
 typedef struct TclTomMathStubs {
     int magic;
     struct TclTomMathStubHooks *hooks;
 
-    int (*tclBN_epoch) _ANSI_ARGS_((void)); /* 0 */
-    int (*tclBN_revision) _ANSI_ARGS_((void)); /* 1 */
-    int (*tclBN_mp_add) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c)); /* 2 */
-    int (*tclBN_mp_add_d) _ANSI_ARGS_((mp_int* a, mp_digit b, mp_int* c)); /* 3 */
-    int (*tclBN_mp_and) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c)); /* 4 */
-    void (*tclBN_mp_clamp) _ANSI_ARGS_((mp_int* a)); /* 5 */
-    void (*tclBN_mp_clear) _ANSI_ARGS_((mp_int* a)); /* 6 */
-    void (*tclBN_mp_clear_multi) _ANSI_ARGS_((mp_int*a, ...)); /* 7 */
-    int (*tclBN_mp_cmp) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 8 */
-    int (*tclBN_mp_cmp_d) _ANSI_ARGS_((mp_int* a, mp_digit b)); /* 9 */
-    int (*tclBN_mp_cmp_mag) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 10 */
-    int (*tclBN_mp_copy) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 11 */
-    int (*tclBN_mp_count_bits) _ANSI_ARGS_((mp_int* a)); /* 12 */
-    int (*tclBN_mp_div) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* q, mp_int* r)); /* 13 */
-    int (*tclBN_mp_div_d) _ANSI_ARGS_((mp_int* a, mp_digit b, mp_int* q, mp_digit* r)); /* 14 */
-    int (*tclBN_mp_div_2) _ANSI_ARGS_((mp_int* a, mp_int* q)); /* 15 */
-    int (*tclBN_mp_div_2d) _ANSI_ARGS_((mp_int* a, int b, mp_int* q, mp_int* r)); /* 16 */
-    int (*tclBN_mp_div_3) _ANSI_ARGS_((mp_int* a, mp_int* q, mp_digit* r)); /* 17 */
-    void (*tclBN_mp_exch) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 18 */
-    int (*tclBN_mp_expt_d) _ANSI_ARGS_((mp_int* a, mp_digit b, mp_int* c)); /* 19 */
-    int (*tclBN_mp_grow) _ANSI_ARGS_((mp_int* a, int size)); /* 20 */
-    int (*tclBN_mp_init) _ANSI_ARGS_((mp_int* a)); /* 21 */
-    int (*tclBN_mp_init_copy) _ANSI_ARGS_((mp_int * a, mp_int* b)); /* 22 */
-    int (*tclBN_mp_init_multi) _ANSI_ARGS_((mp_int*a, ...)); /* 23 */
-    int (*tclBN_mp_init_set) _ANSI_ARGS_((mp_int* a, mp_digit b)); /* 24 */
-    int (*tclBN_mp_init_size) _ANSI_ARGS_((mp_int* a, int size)); /* 25 */
-    int (*tclBN_mp_lshd) _ANSI_ARGS_((mp_int* a, int shift)); /* 26 */
-    int (*tclBN_mp_mod) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* r)); /* 27 */
-    int (*tclBN_mp_mod_2d) _ANSI_ARGS_((mp_int* a, int b, mp_int* r)); /* 28 */
-    int (*tclBN_mp_mul) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* p)); /* 29 */
-    int (*tclBN_mp_mul_d) _ANSI_ARGS_((mp_int* a, mp_digit b, mp_int* p)); /* 30 */
-    int (*tclBN_mp_mul_2) _ANSI_ARGS_((mp_int* a, mp_int* p)); /* 31 */
-    int (*tclBN_mp_mul_2d) _ANSI_ARGS_((mp_int* a, int d, mp_int* p)); /* 32 */
-    int (*tclBN_mp_neg) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 33 */
-    int (*tclBN_mp_or) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c)); /* 34 */
-    int (*tclBN_mp_radix_size) _ANSI_ARGS_((mp_int* a, int radix, int* size)); /* 35 */
-    int (*tclBN_mp_read_radix) _ANSI_ARGS_((mp_int* a, const char* str, int radix)); /* 36 */
-    void (*tclBN_mp_rshd) _ANSI_ARGS_((mp_int * a, int shift)); /* 37 */
-    int (*tclBN_mp_shrink) _ANSI_ARGS_((mp_int* a)); /* 38 */
-    void (*tclBN_mp_set) _ANSI_ARGS_((mp_int* a, mp_digit b)); /* 39 */
-    int (*tclBN_mp_sqr) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 40 */
-    int (*tclBN_mp_sqrt) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 41 */
-    int (*tclBN_mp_sub) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c)); /* 42 */
-    int (*tclBN_mp_sub_d) _ANSI_ARGS_((mp_int* a, mp_digit b, mp_int* c)); /* 43 */
-    int (*tclBN_mp_to_unsigned_bin) _ANSI_ARGS_((mp_int* a, unsigned char* b)); /* 44 */
-    int (*tclBN_mp_to_unsigned_bin_n) _ANSI_ARGS_((mp_int* a, unsigned char* b, unsigned long* outlen)); /* 45 */
-    int (*tclBN_mp_toradix_n) _ANSI_ARGS_((mp_int* a, char* str, int radix, int maxlen)); /* 46 */
-    int (*tclBN_mp_unsigned_bin_size) _ANSI_ARGS_((mp_int* a)); /* 47 */
-    int (*tclBN_mp_xor) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c)); /* 48 */
-    void (*tclBN_mp_zero) _ANSI_ARGS_((mp_int* a)); /* 49 */
-    void (*tclBN_reverse) _ANSI_ARGS_((unsigned char* s, int len)); /* 50 */
-    int (*tclBN_fast_s_mp_mul_digs) _ANSI_ARGS_((mp_int * a, mp_int * b, mp_int * c, int digs)); /* 51 */
-    int (*tclBN_fast_s_mp_sqr) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 52 */
-    int (*tclBN_mp_karatsuba_mul) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c)); /* 53 */
-    int (*tclBN_mp_karatsuba_sqr) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 54 */
-    int (*tclBN_mp_toom_mul) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c)); /* 55 */
-    int (*tclBN_mp_toom_sqr) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 56 */
-    int (*tclBN_s_mp_add) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c)); /* 57 */
-    int (*tclBN_s_mp_mul_digs) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c, int digs)); /* 58 */
-    int (*tclBN_s_mp_sqr) _ANSI_ARGS_((mp_int* a, mp_int* b)); /* 59 */
-    int (*tclBN_s_mp_sub) _ANSI_ARGS_((mp_int* a, mp_int* b, mp_int* c)); /* 60 */
+    int (*tclBN_epoch) (void); /* 0 */
+    int (*tclBN_revision) (void); /* 1 */
+    int (*tclBN_mp_add) (mp_int* a, mp_int* b, mp_int* c); /* 2 */
+    int (*tclBN_mp_add_d) (mp_int* a, mp_digit b, mp_int* c); /* 3 */
+    int (*tclBN_mp_and) (mp_int* a, mp_int* b, mp_int* c); /* 4 */
+    void (*tclBN_mp_clamp) (mp_int* a); /* 5 */
+    void (*tclBN_mp_clear) (mp_int* a); /* 6 */
+    void (*tclBN_mp_clear_multi) (mp_int* a, ...); /* 7 */
+    int (*tclBN_mp_cmp) (mp_int* a, mp_int* b); /* 8 */
+    int (*tclBN_mp_cmp_d) (mp_int* a, mp_digit b); /* 9 */
+    int (*tclBN_mp_cmp_mag) (mp_int* a, mp_int* b); /* 10 */
+    int (*tclBN_mp_copy) (mp_int* a, mp_int* b); /* 11 */
+    int (*tclBN_mp_count_bits) (mp_int* a); /* 12 */
+    int (*tclBN_mp_div) (mp_int* a, mp_int* b, mp_int* q, mp_int* r); /* 13 */
+    int (*tclBN_mp_div_d) (mp_int* a, mp_digit b, mp_int* q, mp_digit* r); /* 14 */
+    int (*tclBN_mp_div_2) (mp_int* a, mp_int* q); /* 15 */
+    int (*tclBN_mp_div_2d) (mp_int* a, int b, mp_int* q, mp_int* r); /* 16 */
+    int (*tclBN_mp_div_3) (mp_int* a, mp_int* q, mp_digit* r); /* 17 */
+    void (*tclBN_mp_exch) (mp_int* a, mp_int* b); /* 18 */
+    int (*tclBN_mp_expt_d) (mp_int* a, mp_digit b, mp_int* c); /* 19 */
+    int (*tclBN_mp_grow) (mp_int* a, int size); /* 20 */
+    int (*tclBN_mp_init) (mp_int* a); /* 21 */
+    int (*tclBN_mp_init_copy) (mp_int * a, mp_int* b); /* 22 */
+    int (*tclBN_mp_init_multi) (mp_int* a, ...); /* 23 */
+    int (*tclBN_mp_init_set) (mp_int* a, mp_digit b); /* 24 */
+    int (*tclBN_mp_init_size) (mp_int* a, int size); /* 25 */
+    int (*tclBN_mp_lshd) (mp_int* a, int shift); /* 26 */
+    int (*tclBN_mp_mod) (mp_int* a, mp_int* b, mp_int* r); /* 27 */
+    int (*tclBN_mp_mod_2d) (mp_int* a, int b, mp_int* r); /* 28 */
+    int (*tclBN_mp_mul) (mp_int* a, mp_int* b, mp_int* p); /* 29 */
+    int (*tclBN_mp_mul_d) (mp_int* a, mp_digit b, mp_int* p); /* 30 */
+    int (*tclBN_mp_mul_2) (mp_int* a, mp_int* p); /* 31 */
+    int (*tclBN_mp_mul_2d) (mp_int* a, int d, mp_int* p); /* 32 */
+    int (*tclBN_mp_neg) (mp_int* a, mp_int* b); /* 33 */
+    int (*tclBN_mp_or) (mp_int* a, mp_int* b, mp_int* c); /* 34 */
+    int (*tclBN_mp_radix_size) (mp_int* a, int radix, int* size); /* 35 */
+    int (*tclBN_mp_read_radix) (mp_int* a, const char* str, int radix); /* 36 */
+    void (*tclBN_mp_rshd) (mp_int * a, int shift); /* 37 */
+    int (*tclBN_mp_shrink) (mp_int* a); /* 38 */
+    void (*tclBN_mp_set) (mp_int* a, mp_digit b); /* 39 */
+    int (*tclBN_mp_sqr) (mp_int* a, mp_int* b); /* 40 */
+    int (*tclBN_mp_sqrt) (mp_int* a, mp_int* b); /* 41 */
+    int (*tclBN_mp_sub) (mp_int* a, mp_int* b, mp_int* c); /* 42 */
+    int (*tclBN_mp_sub_d) (mp_int* a, mp_digit b, mp_int* c); /* 43 */
+    int (*tclBN_mp_to_unsigned_bin) (mp_int* a, unsigned char* b); /* 44 */
+    int (*tclBN_mp_to_unsigned_bin_n) (mp_int* a, unsigned char* b, unsigned long* outlen); /* 45 */
+    int (*tclBN_mp_toradix_n) (mp_int* a, char* str, int radix, int maxlen); /* 46 */
+    int (*tclBN_mp_unsigned_bin_size) (mp_int* a); /* 47 */
+    int (*tclBN_mp_xor) (mp_int* a, mp_int* b, mp_int* c); /* 48 */
+    void (*tclBN_mp_zero) (mp_int* a); /* 49 */
+    void (*tclBN_reverse) (unsigned char* s, int len); /* 50 */
+    int (*tclBN_fast_s_mp_mul_digs) (mp_int * a, mp_int * b, mp_int * c, int digs); /* 51 */
+    int (*tclBN_fast_s_mp_sqr) (mp_int* a, mp_int* b); /* 52 */
+    int (*tclBN_mp_karatsuba_mul) (mp_int* a, mp_int* b, mp_int* c); /* 53 */
+    int (*tclBN_mp_karatsuba_sqr) (mp_int* a, mp_int* b); /* 54 */
+    int (*tclBN_mp_toom_mul) (mp_int* a, mp_int* b, mp_int* c); /* 55 */
+    int (*tclBN_mp_toom_sqr) (mp_int* a, mp_int* b); /* 56 */
+    int (*tclBN_s_mp_add) (mp_int* a, mp_int* b, mp_int* c); /* 57 */
+    int (*tclBN_s_mp_mul_digs) (mp_int* a, mp_int* b, mp_int* c, int digs); /* 58 */
+    int (*tclBN_s_mp_sqr) (mp_int* a, mp_int* b); /* 59 */
+    int (*tclBN_s_mp_sub) (mp_int* a, mp_int* b, mp_int* c); /* 60 */
 } TclTomMathStubs;
 
 #ifdef __cplusplus