diff options
author | dgp <dgp@users.sourceforge.net> | 2023-09-12 16:36:27 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2023-09-12 16:36:27 (GMT) |
commit | edf74f079026ce9f921075e6c94c884b2186bfdf (patch) | |
tree | 7c15add2c3c737ac8e343b3cab213c2b6a5a87c4 /generic/tclPathObj.c | |
parent | 7c80a5acba4103cad245d779a7bfb92a76c541a5 (diff) | |
download | tcl-edf74f079026ce9f921075e6c94c884b2186bfdf.zip tcl-edf74f079026ce9f921075e6c94c884b2186bfdf.tar.gz tcl-edf74f079026ce9f921075e6c94c884b2186bfdf.tar.bz2 |
Use a static declaration when possible and when it matches the name.
Diffstat (limited to 'generic/tclPathObj.c')
-rw-r--r-- | generic/tclPathObj.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclPathObj.c b/generic/tclPathObj.c index e1702f8..1e8f994 100644 --- a/generic/tclPathObj.c +++ b/generic/tclPathObj.c @@ -30,6 +30,9 @@ static int IsSeparatorOrNull(int ch); static Tcl_Obj * GetExtension(Tcl_Obj *pathPtr); static int MakePathFromNormalized(Tcl_Interp *interp, Tcl_Obj *pathPtr); +static int MakeTildeRelativePath(Tcl_Interp *interp, + const char *user, const char *subPath, + Tcl_DString *dsPtr); /* * Define the 'path' object type, which Tcl uses to represent file paths |