diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-19 18:27:06 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-19 18:27:06 (GMT) |
| commit | 775e9aac009c6cd4a3cddbf67de9feac451f5662 (patch) | |
| tree | 7403b32378476c8e8c666143dd7e0c3871904a60 /generic/tclProc.c | |
| parent | 0ff016021c022c1f60500a200461fee9721b97e1 (diff) | |
| parent | 39795a1da493f0ea91a228e768c0c656156ab340 (diff) | |
| download | tcl-775e9aac009c6cd4a3cddbf67de9feac451f5662.zip tcl-775e9aac009c6cd4a3cddbf67de9feac451f5662.tar.gz tcl-775e9aac009c6cd4a3cddbf67de9feac451f5662.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclProc.c')
| -rw-r--r-- | generic/tclProc.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c index 6d07c2a..81da618 100644 --- a/generic/tclProc.c +++ b/generic/tclProc.c @@ -405,13 +405,13 @@ TclCreateProc( Proc **procPtrPtr) /* Returns: pointer to proc data. */ { Interp *iPtr = (Interp *) interp; - (void)nsPtr; Proc *procPtr = NULL; int i, result, numArgs; CompiledLocal *localPtr = NULL; Tcl_Obj **argArray; int precompiled = 0; + (void)nsPtr; ProcGetIntRep(bodyPtr, procPtr); if (procPtr != NULL) { |