diff options
author | nijtmans <nijtmans@noemail.net> | 2010-02-21 20:09:36 (GMT) |
---|---|---|
committer | nijtmans <nijtmans@noemail.net> | 2010-02-21 20:09:36 (GMT) |
commit | eccf3d476a3d8e4fb20b67b0c47d231c86a6eaa0 (patch) | |
tree | 107091c0a01f164224f02d295ebb0a866b39c5d4 /generic/tclStubLib.c | |
parent | 6b0073ad2f47146a50dfcfdb1cbfdd266dc5a615 (diff) | |
download | tcl-eccf3d476a3d8e4fb20b67b0c47d231c86a6eaa0.zip tcl-eccf3d476a3d8e4fb20b67b0c47d231c86a6eaa0.tar.gz tcl-eccf3d476a3d8e4fb20b67b0c47d231c86a6eaa0.tar.bz2 |
Follow-up to Fix [Bug 2954959] expr abs(0.0) is -0.0
Some more tests, showing that the LONG implementation
was not quite correct too, and a fix for that.
Some more internal "const" additions
FossilOrigin-Name: 4a0630650d0b3a477b4fd01121b715e40d2201b7
Diffstat (limited to 'generic/tclStubLib.c')
-rw-r--r-- | generic/tclStubLib.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStubLib.c b/generic/tclStubLib.c index 24eef57..b2f39fa 100644 --- a/generic/tclStubLib.c +++ b/generic/tclStubLib.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclStubLib.c,v 1.29 2008/10/22 20:23:59 nijtmans Exp $ + * RCS: @(#) $Id: tclStubLib.c,v 1.30 2010/02/21 20:09:38 nijtmans Exp $ */ /* @@ -175,7 +175,7 @@ TclTomMathInitializeStubs( ClientData pkgClientData = NULL; const char *actualVersion = Tcl_PkgRequireEx(interp, packageName, version, exact, &pkgClientData); - TclTomMathStubs *stubsPtr = pkgClientData; + const TclTomMathStubs *stubsPtr = pkgClientData; if (actualVersion == NULL) { return NULL; |