diff options
| author | dgp@users.sourceforge.net <dgp> | 2004-10-15 15:42:52 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2004-10-15 15:42:52 (GMT) |
| commit | 1b2dedcf8437a456715d02ed7f401c9403a363d0 (patch) | |
| tree | 21c335966db4ce17ce272e0fc692d6987bb6f22d /generic/tclBasic.c | |
| parent | 73e0ab9031f57e493cb3ce20417ca9a09ad3be20 (diff) | |
| download | tcl-1b2dedcf8437a456715d02ed7f401c9403a363d0.zip tcl-1b2dedcf8437a456715d02ed7f401c9403a363d0.tar.gz tcl-1b2dedcf8437a456715d02ed7f401c9403a363d0.tar.bz2 | |
Remove unused variable
Diffstat (limited to 'generic/tclBasic.c')
| -rw-r--r-- | generic/tclBasic.c | 3 |
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 |