Index: generic/tclBasic.c
===================================================================
RCS file: /cvsroot/tcl/tcl/generic/tclBasic.c,v
retrieving revision 1.295.2.16
diff -w -u -r1.295.2.16 tclBasic.c
--- generic/tclBasic.c	10 Nov 2009 20:19:02 -0000	1.295.2.16
+++ generic/tclBasic.c	11 Dec 2009 18:56:50 -0000
@@ -3442,7 +3442,9 @@
 TclInterpReady(
     Tcl_Interp *interp)
 {
+#if !defined(TCL_NO_STACK_CHECK)
     int localInt; /* used for checking the stack */
+#endif
     register Interp *iPtr = (Interp *) interp;
 
     /*
