diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-03-09 16:34:46 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-03-09 16:34:46 (GMT) |
| commit | f336629f658f0862b12cd860a4edae8b95449eb2 (patch) | |
| tree | e38704da3f3289f90c91833bf10a8e91a3699088 /win/tclWinLoad.c | |
| parent | 254b4fa35fd51a8b78906d5d481f4e1c3901f8b2 (diff) | |
| parent | 065483ce8b22e7da470427493d68f36e6a53b80b (diff) | |
| download | tcl-f336629f658f0862b12cd860a4edae8b95449eb2.zip tcl-f336629f658f0862b12cd860a4edae8b95449eb2.tar.gz tcl-f336629f658f0862b12cd860a4edae8b95449eb2.tar.bz2 | |
merge 8.7
Diffstat (limited to 'win/tclWinLoad.c')
| -rw-r--r-- | win/tclWinLoad.c | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/win/tclWinLoad.c b/win/tclWinLoad.c index 238af65..91bac43 100644 --- a/win/tclWinLoad.c +++ b/win/tclWinLoad.c @@ -61,13 +61,12 @@ TclpDlopen( /* Filled with address of Tcl_FSUnloadFileProc * function which should be used for this * file. */ - int flags) + TCL_UNUSED(int) /*flags*/) { HINSTANCE hInstance = NULL; const WCHAR *nativeName; Tcl_LoadHandle handlePtr; DWORD firstError; - (void)flags; /* * First try the full path the user gave us. This is particularly @@ -282,14 +281,9 @@ UnloadFile( int TclGuessPackageName( - const char *fileName, /* Name of file containing package (already - * translated to local form if needed). */ - Tcl_DString *bufPtr) /* Initialized empty dstring. Append package - * name to this if possible. */ + TCL_UNUSED(const char *), + TCL_UNUSED(Tcl_DString *)) { - (void)fileName; - (void)bufPtr; - return 0; } |