diff options
author | stanton <stanton@noemail.net> | 1999-03-10 05:52:44 (GMT) |
---|---|---|
committer | stanton <stanton@noemail.net> | 1999-03-10 05:52:44 (GMT) |
commit | 3590769e600141e2a2a0e8413790130248ed65ee (patch) | |
tree | 92131df26a09a5f7b28f854fb7c0a62ba26cb8ac /generic/tclProc.c | |
parent | 6aec87e7efaa5196e38566cf45beecc6c2496510 (diff) | |
download | tcl-3590769e600141e2a2a0e8413790130248ed65ee.zip tcl-3590769e600141e2a2a0e8413790130248ed65ee.tar.gz tcl-3590769e600141e2a2a0e8413790130248ed65ee.tar.bz2 |
Merged stubs changes into mainline for 8.0
FossilOrigin-Name: 19696933517612024e7dbcfee6e3c8d3b4e41772
Diffstat (limited to 'generic/tclProc.c')
-rw-r--r-- | generic/tclProc.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c index 34c6ce6..d9f5f58 100644 --- a/generic/tclProc.c +++ b/generic/tclProc.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: tclProc.c,v 1.17 1999/02/03 00:55:06 stanton Exp $ + * RCS: @(#) $Id: tclProc.c,v 1.18 1999/03/10 05:52:49 stanton Exp $ */ #include "tclInt.h" @@ -185,7 +185,7 @@ TclCreateProc(interp, nsPtr, procName, argsPtr, bodyPtr, procPtrPtr) register Proc *procPtr; int i, length, result, numArgs; char *args, *bytes, *p; - register CompiledLocal *localPtr; + register CompiledLocal *localPtr = NULL; Tcl_Obj *defPtr; int precompiled = 0; |