diff options
| author | nijtmans <nijtmans> | 2010-02-21 20:09:37 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-02-21 20:09:37 (GMT) |
| commit | c0efda860028550fa1392602cb9d479a67c7cf55 (patch) | |
| tree | 107091c0a01f164224f02d295ebb0a866b39c5d4 /generic/tclStubLib.c | |
| parent | 3fb3008b2698db7d2a9f46adeac8c91565ba890b (diff) | |
| download | tcl-c0efda860028550fa1392602cb9d479a67c7cf55.zip tcl-c0efda860028550fa1392602cb9d479a67c7cf55.tar.gz tcl-c0efda860028550fa1392602cb9d479a67c7cf55.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.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; |