diff options
| author | stanton <stanton> | 1999-03-10 05:52:45 (GMT) |
|---|---|---|
| committer | stanton <stanton> | 1999-03-10 05:52:45 (GMT) |
| commit | 0b4be24161f5971f3181adec27a32becf7cb8870 (patch) | |
| tree | 92131df26a09a5f7b28f854fb7c0a62ba26cb8ac /generic/tclProc.c | |
| parent | a5bface5b6607af37870fc5f5ee5019f6d5fb3f1 (diff) | |
| download | tcl-0b4be24161f5971f3181adec27a32becf7cb8870.zip tcl-0b4be24161f5971f3181adec27a32becf7cb8870.tar.gz tcl-0b4be24161f5971f3181adec27a32becf7cb8870.tar.bz2 | |
Merged stubs changes into mainline for 8.0
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; |