summaryrefslogtreecommitdiffstats
path: root/generic/tclStubLib.c
diff options
context:
space:
mode:
authornijtmans <nijtmans>2010-02-21 20:09:37 (GMT)
committernijtmans <nijtmans>2010-02-21 20:09:37 (GMT)
commite139c3c88546d6d60e65616ae90cf42afffa66fc (patch)
tree107091c0a01f164224f02d295ebb0a866b39c5d4 /generic/tclStubLib.c
parent319e92bda543b22f7497b294d42e7bd75e40a8e3 (diff)
downloadtcl-e139c3c88546d6d60e65616ae90cf42afffa66fc.zip
tcl-e139c3c88546d6d60e65616ae90cf42afffa66fc.tar.gz
tcl-e139c3c88546d6d60e65616ae90cf42afffa66fc.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
Diffstat (limited to 'generic/tclStubLib.c')
-rw-r--r--generic/tclStubLib.c4
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;