diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2004-05-24 21:48:31 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2004-05-24 21:48:31 (GMT) |
| commit | 8357e1bbb6ca9e656801de05df415698640e17bb (patch) | |
| tree | 80f2898455066a6fd5b28f87b69ab99fbe377e16 /generic/tclInterp.c | |
| parent | 5d8ab9672cd4860dc923d1999563e0c97ff1cf13 (diff) | |
| download | tcl-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.c | 4 |
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 |