Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Patch contributed by Roy Keene (rkeene) |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | etoyoc |
| Files: | files | file ages | folders |
| SHA1: |
2c448bd4cf3cafa81d1bddfd54c971a2 |
| User & Date: | hypnotoad 2014-11-18 18:21:08 |
Context
|
2015-09-24
| ||
| 20:22 | Added a SHED definition check-in: 5d9bc6cbb4 user: hypnotoad tags: etoyoc | |
|
2014-11-18
| ||
| 18:21 | Patch contributed by Roy Keene (rkeene) check-in: 2c448bd4cf user: hypnotoad tags: etoyoc | |
|
2014-04-16
| ||
| 03:21 | Tweaks to try to get autoconf happy under buildroot check-in: ed1a481bdf user: seandeelywoods tags: etoyoc | |
Changes
Changes to generic/vfs.c.
2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 |
interp = nativeRep->fsCmd->interp;
if (Tcl_InterpDeleted(interp)) {
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;
}
Tcl_ListObjAppendElement(NULL, mountCmd, Tcl_NewStringObj(cmd,-1));
if (splitPosition == len) {
Tcl_ListObjAppendElement(NULL, mountCmd, normed);
Tcl_ListObjAppendElement(NULL, mountCmd, Tcl_NewStringObj("",0));
} else {
Tcl_ListObjAppendElement(NULL, mountCmd,
Tcl_NewStringObj(normedString,splitPosition));
|
< < < < > > > > > |
2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 |
interp = nativeRep->fsCmd->interp;
if (Tcl_InterpDeleted(interp)) {
return NULL;
}
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);
Tcl_ListObjAppendElement(NULL, mountCmd, Tcl_NewStringObj("",0));
} else {
Tcl_ListObjAppendElement(NULL, mountCmd,
Tcl_NewStringObj(normedString,splitPosition));
|