summaryrefslogtreecommitdiffstats
path: root/generic/tclInterp.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2004-05-24 21:48:31 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2004-05-24 21:48:31 (GMT)
commit8357e1bbb6ca9e656801de05df415698640e17bb (patch)
tree80f2898455066a6fd5b28f87b69ab99fbe377e16 /generic/tclInterp.c
parent5d8ab9672cd4860dc923d1999563e0c97ff1cf13 (diff)
downloadtcl-8357e1bbb6ca9e656801de05df415698640e17bb.zip
tcl-8357e1bbb6ca9e656801de05df415698640e17bb.tar.gz
tcl-8357e1bbb6ca9e656801de05df415698640e17bb.tar.bz2
Fixed [Bug 959193] which is apparently a word-size issue.
Diffstat (limited to 'generic/tclInterp.c')
-rw-r--r--generic/tclInterp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclInterp.c b/generic/tclInterp.c
index 0354f5e..4c673a0 100644
--- a/generic/tclInterp.c
+++ b/generic/tclInterp.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: tclInterp.c,v 1.32 2004/05/20 13:04:11 dkf Exp $
+ * RCS: @(#) $Id: tclInterp.c,v 1.33 2004/05/24 21:48:32 dkf Exp $
*/
#include "tclInt.h"
@@ -3176,7 +3176,7 @@ TclInitLimitSupport(interp)
iPtr->limit.timeHandlers = NULL;
iPtr->limit.timeGranularity = 10;
Tcl_InitHashTable(&iPtr->limit.callbacks,
- sizeof(struct ScriptLimitCallbackKey)/sizeof(ClientData));
+ sizeof(struct ScriptLimitCallbackKey)/sizeof(int));
}
static void