summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2004-10-15 15:42:52 (GMT)
committerdgp <dgp@users.sourceforge.net>2004-10-15 15:42:52 (GMT)
commit0821784e04e2aa7a2582947073659cde9e421abd (patch)
tree21c335966db4ce17ce272e0fc692d6987bb6f22d
parent0eb70513827981212a928f0a5b63afb70c53c960 (diff)
downloadtcl-0821784e04e2aa7a2582947073659cde9e421abd.zip
tcl-0821784e04e2aa7a2582947073659cde9e421abd.tar.gz
tcl-0821784e04e2aa7a2582947073659cde9e421abd.tar.bz2
Remove unused variable
-rw-r--r--generic/tclBasic.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index 8891f52..69a2453 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -13,7 +13,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclBasic.c,v 1.126 2004/10/15 04:01:27 dgp Exp $
+ * RCS: @(#) $Id: tclBasic.c,v 1.127 2004/10/15 15:42:52 dgp Exp $
*/
#include "tclInt.h"
@@ -4457,7 +4457,6 @@ Tcl_AddObjErrorInfo(interp, message, length)
* NULL byte. */
{
register Interp *iPtr = (Interp *) interp;
- Tcl_Obj *messagePtr;
/*
* If we are just starting to log an error, errorInfo is initialized