summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorMiguel Sofer <miguel.sofer@gmail.com>2008-07-13 09:29:51 (GMT)
committerMiguel Sofer <miguel.sofer@gmail.com>2008-07-13 09:29:51 (GMT)
commit70c3540c76b3c5e4cf4f722288dc9d406ae48b8d (patch)
tree5b9bc00f19d20942f19333827ca48183ee9623e1 /generic
parent426c232d6ea53581ef51e7015012c3469572e206 (diff)
downloadtcl-70c3540c76b3c5e4cf4f722288dc9d406ae48b8d.zip
tcl-70c3540c76b3c5e4cf4f722288dc9d406ae48b8d.tar.gz
tcl-70c3540c76b3c5e4cf4f722288dc9d406ae48b8d.tar.bz2
silence compiler warnings about uninited variables (gcc can't follow the logic)
Diffstat (limited to 'generic')
-rw-r--r--generic/tclExecute.c10
1 files changed, 6 insertions, 4 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 690d190..1299cce 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -14,7 +14,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclExecute.c,v 1.376 2008/07/13 09:03:33 msofer Exp $
+ * RCS: @(#) $Id: tclExecute.c,v 1.377 2008/07/13 09:29:51 msofer Exp $
*/
#include "tclInt.h"
@@ -1797,10 +1797,12 @@ TclExecuteByteCode(
* Globals: variables that store state, must remain valid at all times.
*/
- ptrdiff_t *catchTop;
- register Tcl_Obj **tosPtr; /* Cached pointer to top of evaluation
+ ptrdiff_t *catchTop = 0;
+ register Tcl_Obj **tosPtr = NULL;
+ /* Cached pointer to top of evaluation
* stack. */
- register unsigned char *pc; /* The current program counter. */
+ register unsigned char *pc = NULL;
+ /* The current program counter. */
int instructionCount = 0; /* Counter that is used to work out when to
* call Tcl_AsyncReady() */
Tcl_Obj *auxObjList; /* Linked list of aux data, used for {*} and