diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-03-08 13:58:07 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-03-08 13:58:07 (GMT) |
| commit | 085094bd8714e2c46e3f098189728bb966eb3fb0 (patch) | |
| tree | f4356570ef34bccd58b4fe5919622104963e6ed7 /generic/tclPathObj.c | |
| parent | 89b0bdb8829f03a5216972f59d54b3fa8a1bef16 (diff) | |
| download | tcl-085094bd8714e2c46e3f098189728bb966eb3fb0.zip tcl-085094bd8714e2c46e3f098189728bb966eb3fb0.tar.gz tcl-085094bd8714e2c46e3f098189728bb966eb3fb0.tar.bz2 | |
More TCL_UNUSED.
Diffstat (limited to 'generic/tclPathObj.c')
| -rw-r--r-- | generic/tclPathObj.c | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/generic/tclPathObj.c b/generic/tclPathObj.c index 7accfa2..32b2961 100644 --- a/generic/tclPathObj.c +++ b/generic/tclPathObj.c @@ -1385,14 +1385,13 @@ AppendPath( Tcl_Obj * TclFSMakePathRelative( - Tcl_Interp *dummy, /* Used for error reporting if not NULL. */ + TCL_UNUSED(Tcl_Interp *), Tcl_Obj *pathPtr, /* The path we have. */ Tcl_Obj *cwdPtr) /* Make it relative to this. */ { int cwdLen, len; const char *tempStr; Tcl_ObjIntRep *irPtr = TclFetchIntRep(pathPtr, &fsPathType); - (void)dummy; if (irPtr) { FsPath *fsPathPtr = PATHOBJ(pathPtr); @@ -1457,11 +1456,10 @@ TclFSMakePathRelative( static int MakePathFromNormalized( - Tcl_Interp *dummy, /* Not used. */ + TCL_UNUSED(Tcl_Interp *), Tcl_Obj *pathPtr) /* The object to convert. */ { FsPath *fsPathPtr; - (void)dummy; if (TclHasIntRep(pathPtr, &fsPathType)) { return TCL_OK; @@ -2512,9 +2510,8 @@ UpdateStringOfFsPath( int TclNativePathInFilesystem( Tcl_Obj *pathPtr, - ClientData *dummy) + TCL_UNUSED(ClientData *)) { - (void)dummy; /* * A special case is required to handle the empty path "". This is a valid * path (i.e. the user should be able to do 'file exists ""' without |