diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-23 15:54:28 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-23 15:54:28 (GMT) |
commit | 5a174a842bbfcc9190a6b1cb51e3d28127fcc6f5 (patch) | |
tree | 5fc477b4d92982aafbd75d7e7812180def41a33c /generic/tclStubCall.c | |
parent | b64263906d5ccdfc8d2eb75c1bccec3aacb898fa (diff) | |
parent | 3a13b3b940216a3791902631b76202e243d7a52e (diff) | |
download | tcl-5a174a842bbfcc9190a6b1cb51e3d28127fcc6f5.zip tcl-5a174a842bbfcc9190a6b1cb51e3d28127fcc6f5.tar.gz tcl-5a174a842bbfcc9190a6b1cb51e3d28127fcc6f5.tar.bz2 |
Merge 9.0
Diffstat (limited to 'generic/tclStubCall.c')
-rw-r--r-- | generic/tclStubCall.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStubCall.c b/generic/tclStubCall.c index 0036e3a..42111a9 100644 --- a/generic/tclStubCall.c +++ b/generic/tclStubCall.c @@ -62,7 +62,7 @@ TclStubCall(void *arg) static void *stubFn[] = {NULL,NULL,NULL,NULL,NULL,NULL,NULL}; unsigned index = PTR2UINT(arg); - if (index > sizeof(PROCNAME)/sizeof(PROCNAME[0])) { + if (index >= sizeof(PROCNAME)/sizeof(PROCNAME[0])) { /* Any other value means Tcl_SetPanicProc() with non-null panicProc */ index = 0; } |