summaryrefslogtreecommitdiffstats
path: root/generic/tclUtil.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2008-08-22 17:26:46 (GMT)
committerdgp <dgp@users.sourceforge.net>2008-08-22 17:26:46 (GMT)
commit6f75579e3a357853eaa316f593edcb47eddc0c36 (patch)
treedc9d8441b300ef5406bb5f60de8fe103e8474fac /generic/tclUtil.c
parentc81af542ef2037176d7f71f883aa3e93dfc4196b (diff)
downloadtcl-6f75579e3a357853eaa316f593edcb47eddc0c36.zip
tcl-6f75579e3a357853eaa316f593edcb47eddc0c36.tar.gz
tcl-6f75579e3a357853eaa316f593edcb47eddc0c36.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/tclUtil.c')
-rw-r--r--generic/tclUtil.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/tclUtil.c b/generic/tclUtil.c
index 605951c..6f74ad8 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.101 2008/08/21 23:42:13 hobbs Exp $
+ * RCS: @(#) $Id: tclUtil.c,v 1.102 2008/08/22 17:26:46 dgp Exp $
*/
#include "tclInt.h"
@@ -3301,6 +3301,9 @@ TclReToGlob(
}
*dsStr++ = '*';
Tcl_DStringSetLength(dsPtr, dsStr - dsStrStart);
+ if (exactPtr) {
+ *exactPtr = 0;
+ }
return TCL_OK;
}