diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-09-18 15:13:40 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-09-18 15:13:40 (GMT) |
| commit | db596f769f7d0d74193f88b121b949bce6853ebf (patch) | |
| tree | feb67968040c4869b021497e6e8859e0e90e41be /generic/tclStubInit.c | |
| parent | 36098aafd9bbd015808f0607f94acc590d192e0d (diff) | |
| parent | 7a4fe54c26332c21cd95b01cc07bd74714d060ae (diff) | |
| download | tcl-z_modifier.zip tcl-z_modifier.tar.gz tcl-z_modifier.tar.bz2 | |
Merge trunkz_modifier
Diffstat (limited to 'generic/tclStubInit.c')
| -rw-r--r-- | generic/tclStubInit.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 8cc21aa..ebd2086 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -69,6 +69,9 @@ static int TclSockMinimumBuffersOld(int sock, int size) # define TclWinGetSockOpt 0 # define TclWinSetSockOpt 0 # define TclWinNToHS 0 +# define TclBNInitBignumFromWideUInt 0 +# define TclBNInitBignumFromWideInt 0 +# define TclBNInitBignumFromLong 0 #else #define TclSetStartupScriptPath setStartupScriptPath static void TclSetStartupScriptPath(Tcl_Obj *path) @@ -103,6 +106,9 @@ static unsigned short TclWinNToHS(unsigned short ns) { return ntohs(ns); } #endif +# define TclBNInitBignumFromWideUInt TclInitBignumFromWideUInt +# define TclBNInitBignumFromWideInt TclInitBignumFromWideInt +# define TclBNInitBignumFromLong TclInitBignumFromLong #endif /* TCL_NO_DEPRECATED */ #ifdef _WIN32 @@ -859,6 +865,10 @@ const TclTomMathStubs tclTomMathStubs = { TclBNInitBignumFromWideInt, /* 65 */ TclBNInitBignumFromWideUInt, /* 66 */ TclBN_mp_expt_d_ex, /* 67 */ + TclBN_mp_set_long_long, /* 68 */ + TclBN_mp_get_long_long, /* 69 */ + TclBN_mp_set_long, /* 70 */ + TclBN_mp_get_long, /* 71 */ }; static const TclStubHooks tclStubHooks = { |