From b4bfd9a64a9a53cfbbd8a729a9a7ce7a0bcf95d0 Mon Sep 17 00:00:00 2001 From: dgp Date: Mon, 20 Jun 2016 19:23:17 +0000 Subject: [c383ebb5e4] Match DStringInit and DStringFree properly. --- generic/tclFileName.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/generic/tclFileName.c b/generic/tclFileName.c index 39bac99..bf463f5 100644 --- a/generic/tclFileName.c +++ b/generic/tclFileName.c @@ -1595,8 +1595,8 @@ Tcl_GlobObjCmd( } else if (dir == PATH_GENERAL) { Tcl_DString str; + Tcl_DStringInit(&str); for (i = 0; i < objc; i++) { - Tcl_DStringInit(&str); if (dir == PATH_GENERAL) { TclDStringAppendDString(&str, &prefix); } -- cgit v0.12