Overview
SHA1: | 2bfc88617310a273bd9ec52a223dd73de1c4a114 |
---|---|
Date: | 2014-11-17 18:43:33 |
User: | rkeene |
Comment: | Fixed bug in TclVFS where internal representation was used after being free'd |
Timelines: | family | ancestors | descendants | both | trunk |
Downloads: | Tarball | ZIP archive |
Other Links: | files | file ages | folders | manifest |
Tags And Properties
- branch=trunk inherited from [0864309db2]
- sym-trunk inherited from [0864309db2]
Context
2014-11-19
| ||
04:25 | [3d4fcdb4c1] Updated to disable TclX when cross-compiling (user: rkeene, tags: trunk) | |
2014-11-17
| ||
18:43 | [2bfc886173] Fixed bug in TclVFS where internal representation was used after being free'd (user: rkeene, tags: trunk) | |
18:43 | [dfa8940a62] Updated order of Incr/Decr in CVFS for consistency (user: rkeene, tags: trunk) | |
Changes
Added tclvfs/patches/all/tclvfs-20080503-fixinternalrepuse.diff version [2689cdda92].
> > > > > > > > > > > > > > > > > > > > > > > > |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
--- tclvfs-20080503.orig/generic/vfs.c 2006-08-30 19:38:03.000000000 +0000 +++ tclvfs-20080503-fixinternalrepuse/generic/vfs.c 2014-11-17 18:34:43.317025829 +0000 @@ -1986,16 +1986,17 @@ return NULL; } - splitPosition = nativeRep->splitPosition; - normed = Tcl_FSGetNormalizedPath(NULL, pathPtr); - normedString = Tcl_GetStringFromObj(normed, &len); - mountCmd = Tcl_DuplicateObj(nativeRep->fsCmd->mountCmd); Tcl_IncrRefCount(mountCmd); if (Tcl_ListObjLength(NULL, mountCmd, &dummyLen) == TCL_ERROR) { Tcl_DecrRefCount(mountCmd); return NULL; } + + splitPosition = nativeRep->splitPosition; + normed = Tcl_FSGetNormalizedPath(NULL, pathPtr); + normedString = Tcl_GetStringFromObj(normed, &len); + Tcl_ListObjAppendElement(NULL, mountCmd, Tcl_NewStringObj(cmd,-1)); if (splitPosition == len) { Tcl_ListObjAppendElement(NULL, mountCmd, normed); |