From 9d8dfabf5faa8cdb48851e1087458f4431ab7f45 Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Wed, 29 Sep 2004 22:23:25 +0000
Subject: Remove unused variable

---
 generic/tclRegexp.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/generic/tclRegexp.c b/generic/tclRegexp.c
index f764bec..1909ed6 100644
--- a/generic/tclRegexp.c
+++ b/generic/tclRegexp.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: tclRegexp.c,v 1.16 2004/09/29 22:17:30 dkf Exp $
+ * RCS: @(#) $Id: tclRegexp.c,v 1.17 2004/09/29 22:23:25 dkf Exp $
  */
 
 #include "tclInt.h"
@@ -561,7 +561,6 @@ Tcl_GetRegExpFromObj(interp, objPtr, flags)
     int flags;			/* Regular expression compilation flags. */
 {
     int length;
-    Tcl_ObjType *typePtr;
     TclRegexp *regexpPtr;
     char *pattern;
 
-- 
cgit v0.12