diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-09-13 10:14:31 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-09-13 10:14:31 (GMT) |
| commit | c659b044b1e05ff3f4bcd0a94b01b3d2611c251c (patch) | |
| tree | 6461d7a562bf2e681c2cf49147418c2349f58c07 /generic/tclStubInit.c | |
| parent | 3e55dbb18cf086d34207ca2e744ecea04cc67b38 (diff) | |
| download | tcl-c659b044b1e05ff3f4bcd0a94b01b3d2611c251c.zip tcl-c659b044b1e05ff3f4bcd0a94b01b3d2611c251c.tar.gz tcl-c659b044b1e05ff3f4bcd0a94b01b3d2611c251c.tar.bz2 | |
Make mp_get_long and mp_set_long available to tommath-enabled Tcl extensions. Deprecate the internal TclBNInitBignumFrom* functions, in favor of the official tommath functions with the same purpose.
Diffstat (limited to 'generic/tclStubInit.c')
| -rw-r--r-- | generic/tclStubInit.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index a2f1ed3..2845441 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 |