diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-04-04 20:17:52 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-04-04 20:17:52 (GMT) |
commit | cb6044b9fc72e9d050461b42b760f19b44b0680d (patch) | |
tree | 725b2ac6036503f137a6158c49e0b7321dab9f13 /generic/tclPathObj.c | |
parent | 308ff20a3b5a4979f9997480ecd308756b08525a (diff) | |
parent | 35931d9a7cb0477591913a5a95bc958f75fbded8 (diff) | |
download | tcl-cb6044b9fc72e9d050461b42b760f19b44b0680d.zip tcl-cb6044b9fc72e9d050461b42b760f19b44b0680d.tar.gz tcl-cb6044b9fc72e9d050461b42b760f19b44b0680d.tar.bz2 |
some formatting (*.decls)
move up #undef, for macro which is conflicting with later stuff.
remove some unused cygwin-related code
some minor gcc warnings
Diffstat (limited to 'generic/tclPathObj.c')
-rw-r--r-- | generic/tclPathObj.c | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/generic/tclPathObj.c b/generic/tclPathObj.c index 6a26b9f..b6f3205 100644 --- a/generic/tclPathObj.c +++ b/generic/tclPathObj.c @@ -2408,9 +2408,6 @@ SetFsPathFromAny( FsPath *fsPathPtr; Tcl_Obj *transPtr; char *name; -#if defined(__CYGWIN__) && defined(__WIN32__) - int copied = 0; -#endif ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&tclFsDataKey); if (pathPtr->typePtr == &tclFsPathType) { @@ -2557,30 +2554,6 @@ SetFsPathFromAny( pathPtr->refCount--; } -#if defined(__CYGWIN__) && defined(__WIN32__) - { - char winbuf[MAX_PATH+1]; - - /* - * In the Cygwin world, call conv_to_win32_path in order to use the - * mount table to translate the file name into something Windows will - * understand. Take care when converting empty strings! - */ - - name = Tcl_GetStringFromObj(transPtr, &len); - if (len > 0) { - cygwin_conv_to_win32_path(name, winbuf); - TclWinNoBackslash(winbuf); - if (Tcl_IsShared(transPtr)) { - copied = 1; - transPtr = Tcl_DuplicateObj(transPtr); - Tcl_IncrRefCount(transPtr); - } - Tcl_SetStringObj(transPtr, winbuf, -1); - } - } -#endif /* __CYGWIN__ && __WIN32__ */ - /* * Now we have a translated filename in 'transPtr'. This will have forward * slashes on Windows, and will not contain any ~user sequences. @@ -2606,12 +2579,6 @@ SetFsPathFromAny( SETPATHOBJ(pathPtr, fsPathPtr); PATHFLAGS(pathPtr) = 0; pathPtr->typePtr = &tclFsPathType; -#if defined(__CYGWIN__) && defined(__WIN32__) - if (copied) { - Tcl_DecrRefCount(transPtr); - } -#endif - return TCL_OK; } |