diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2003-11-15 23:42:42 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2003-11-15 23:42:42 (GMT) |
| commit | ecebf970f39a0b05f31b112c01c6d5b41434eed9 (patch) | |
| tree | 2784dfe8da3d8d4ebd5324f90582e8c615b89383 | |
| parent | a4473d0519ece391164179a6946f03562c3d04b7 (diff) | |
| download | tcl-ecebf970f39a0b05f31b112c01c6d5b41434eed9.zip tcl-ecebf970f39a0b05f31b112c01c6d5b41434eed9.tar.gz tcl-ecebf970f39a0b05f31b112c01c6d5b41434eed9.tar.bz2 | |
Stop VC++ 5.2 warning. [Bug 842511]
| -rw-r--r-- | ChangeLog | 9 | ||||
| -rw-r--r-- | generic/tclTest.c | 4 |
2 files changed, 11 insertions, 2 deletions
@@ -1,3 +1,12 @@ +2003-11-15 Donal K. Fellows <donal.k.fellows@man.ac.uk> + + * generic/tclTest.c (TestHashSystemHashCmd): Removed 'const' + modifier from hash type structure; it should be const and the hash + code assumes it behaves like const, but that's not how the API is + defined. Like this, we are following in the same footsteps as + Tcl_RegisterObjType() which has the same conditions on its + argument. Stops VC++5.2 warning. [Bug 842511] + 2003-11-14 Donal K. Fellows <donal.k.fellows@man.ac.uk> * generic/tclHash.c (Tcl_DeleteHashTable,Tcl_HashStats,RebuildTable): diff --git a/generic/tclTest.c b/generic/tclTest.c index bfc0481..794f7e3 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclTest.c,v 1.71 2003/11/14 23:21:02 dkf Exp $ + * RCS: @(#) $Id: tclTest.c,v 1.72 2003/11/15 23:42:42 dkf Exp $ */ #define TCL_TEST @@ -6466,7 +6466,7 @@ TestHashSystemHashCmd(clientData, interp, objc, objv) int objc; Tcl_Obj *CONST objv[]; { - static const Tcl_HashKeyType hkType = { + static Tcl_HashKeyType hkType = { TCL_HASH_KEY_TYPE_VERSION, TCL_HASH_KEY_SYSTEM_HASH, NULL, NULL, NULL, NULL }; |