diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-05 15:14:29 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-05 15:14:29 (GMT) |
commit | 96c82a32e19afd4581f3aa21da39c8c6aa90bd7c (patch) | |
tree | 31455945857d2de92c86342b6a07d812a83f4350 /unix/tclUnixFile.c | |
parent | 2d7fb3bc20951567f5cd26584fb146ea5c271cc2 (diff) | |
parent | 26c1cd495a1ba8397db198e13aafe1a29287e6d0 (diff) | |
download | tcl-96c82a32e19afd4581f3aa21da39c8c6aa90bd7c.zip tcl-96c82a32e19afd4581f3aa21da39c8c6aa90bd7c.tar.gz tcl-96c82a32e19afd4581f3aa21da39c8c6aa90bd7c.tar.bz2 |
Mark more function paramaters as unused. Now Tcl compiles fully (on UNIX and Windows) without -Wunused-parameters warnings
Diffstat (limited to 'unix/tclUnixFile.c')
-rw-r--r-- | unix/tclUnixFile.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/unix/tclUnixFile.c b/unix/tclUnixFile.c index 2f6baf6..6b0ddb0 100644 --- a/unix/tclUnixFile.c +++ b/unix/tclUnixFile.c @@ -44,6 +44,8 @@ TclpFindExecutable( int length; char buf[PATH_MAX * 2]; char name[PATH_MAX * TCL_UTF_MAX + 1]; + (void)argv0; + GetModuleFileNameW(NULL, buf, PATH_MAX); cygwin_conv_path(3, buf, name, PATH_MAX); length = strlen(name); @@ -555,6 +557,8 @@ NativeMatchType( return matchResult; } } +#else + (void)interp; #endif /* MAC_OSX_TCL */ return 1; @@ -1018,6 +1022,7 @@ Tcl_Obj * TclpFilesystemPathType( Tcl_Obj *pathPtr) { + (void)pathPtr; /* * All native paths are of the same type. */ |