diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-08-29 13:28:32 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-08-29 13:28:32 (GMT) |
| commit | 4187ab8e37b22866a8b3a8727b9d661bca6378c8 (patch) | |
| tree | adefcd33b5268f2e85014860b1f8aca78237da6c /win/tclWinReg.c | |
| parent | 4796062aab8a24df621cf33dbe862f72b36986f8 (diff) | |
| parent | a812c806619d185a0f16bfa431b848006ba98044 (diff) | |
| download | tcl-4187ab8e37b22866a8b3a8727b9d661bca6378c8.zip tcl-4187ab8e37b22866a8b3a8727b9d661bca6378c8.tar.gz tcl-4187ab8e37b22866a8b3a8727b9d661bca6378c8.tar.bz2 | |
Merge tip-548
Diffstat (limited to 'win/tclWinReg.c')
| -rw-r--r-- | win/tclWinReg.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/win/tclWinReg.c b/win/tclWinReg.c index 73208b9..41a9b37 100644 --- a/win/tclWinReg.c +++ b/win/tclWinReg.c @@ -214,6 +214,7 @@ Registry_Unload( { Tcl_Command cmd; Tcl_Obj *objv[3]; + (void)flags; /* * Unregister the registry package. There is no Tcl_PkgForget() @@ -280,7 +281,7 @@ DeleteCmd( static int RegistryObjCmd( - ClientData clientData, /* Not used. */ + ClientData dummy, /* Not used. */ Tcl_Interp *interp, /* Current interpreter. */ int objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument values. */ @@ -299,6 +300,7 @@ RegistryObjCmd( static const char *const modes[] = { "-32bit", "-64bit", NULL }; + (void)dummy; if (objc < 2) { wrongArgs: |