summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2008-08-22 17:20:35 (GMT)
committerdgp <dgp@users.sourceforge.net>2008-08-22 17:20:35 (GMT)
commit89caec97fd7d5e85719e6a561e81ca0b5204b09a (patch)
tree041051f0aa1f76b38ecbe089c40c13118e65b907 /generic
parent2e1f9a90e2bb9a21b3ccc70970b71384199885e1 (diff)
downloadtcl-89caec97fd7d5e85719e6a561e81ca0b5204b09a.zip
tcl-89caec97fd7d5e85719e6a561e81ca0b5204b09a.tar.gz
tcl-89caec97fd7d5e85719e6a561e81ca0b5204b09a.tar.bz2
* generic/tclUtil.c (TclReToGlob): Added missing set of the
*exactPtr value to really fix [Bug 2065115]. * tests/regexpComp.test: Correct duplicate test names.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclUtil.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/tclUtil.c b/generic/tclUtil.c
index ec0f2ff..3b59171 100644
--- a/generic/tclUtil.c
+++ b/generic/tclUtil.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclUtil.c,v 1.97.2.3 2008/08/21 23:42:22 hobbs Exp $
+ * RCS: @(#) $Id: tclUtil.c,v 1.97.2.4 2008/08/22 17:20:37 dgp Exp $
*/
#include "tclInt.h"
@@ -3300,6 +3300,9 @@ TclReToGlob(
}
*dsStr++ = '*';
Tcl_DStringSetLength(dsPtr, dsStr - dsStrStart);
+ if (exactPtr) {
+ *exactPtr = 0;
+ }
return TCL_OK;
}