summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2004-02-23 10:43:23 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2004-02-23 10:43:23 (GMT)
commit6842d4e8779d8ccdfd67170215cef172e9474e9e (patch)
treeae547be750c6e5e12af1bdea4b42aef1911500fe /generic
parent17485c720f551fd753dbaa2f744bc5ad46abb444 (diff)
downloadtcl-6842d4e8779d8ccdfd67170215cef172e9474e9e.zip
tcl-6842d4e8779d8ccdfd67170215cef172e9474e9e.tar.gz
tcl-6842d4e8779d8ccdfd67170215cef172e9474e9e.tar.bz2
Fix memleak. [Bug 902562]
Diffstat (limited to 'generic')
-rw-r--r--generic/regc_locale.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/regc_locale.c b/generic/regc_locale.c
index f6a10ed..50f4792 100644
--- a/generic/regc_locale.c
+++ b/generic/regc_locale.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: regc_locale.c,v 1.10 2002/07/29 12:27:51 dkf Exp $
+ * RCS: @(#) $Id: regc_locale.c,v 1.11 2004/02/23 10:43:23 dkf Exp $
*/
/* ASCII character-name table */
@@ -770,7 +770,7 @@ cclass(v, startp, endp, cases)
break;
}
}
- Tcl_DStringInit(&ds);
+ Tcl_DStringFree(&ds);
if (index == -1) {
ERR(REG_ECTYPE);
return NULL;