diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-15 11:07:46 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-15 11:07:46 (GMT) |
| commit | 092dd70e63fd7c5fcc9526b06c1242322378d492 (patch) | |
| tree | 06c8f4cccd36e0b288f5a6f6334af32307f44b5e /win/tclWinReg.c | |
| parent | 17c90c83d4e0dda77c45f716df7eb3e37a7171da (diff) | |
| download | tcl-092dd70e63fd7c5fcc9526b06c1242322378d492.zip tcl-092dd70e63fd7c5fcc9526b06c1242322378d492.tar.gz tcl-092dd70e63fd7c5fcc9526b06c1242322378d492.tar.bz2 | |
[Bug 3388350] mingw64 compiler warnings
Diffstat (limited to 'win/tclWinReg.c')
| -rw-r--r-- | win/tclWinReg.c | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/win/tclWinReg.c b/win/tclWinReg.c index 98e6548..a73be77 100644 --- a/win/tclWinReg.c +++ b/win/tclWinReg.c @@ -253,7 +253,7 @@ RegistryObjCmd( Tcl_Obj * CONST objv[]) /* Argument values. */ { int index; - char *errString; + char *errString = NULL; static CONST char *subcommands[] = { "broadcast", "delete", "get", "keys", "set", "type", "values", @@ -806,7 +806,7 @@ GetValue( * Save binary data as a byte array. */ - Tcl_SetByteArrayObj(resultPtr, Tcl_DStringValue(&data), (int) length); + Tcl_SetByteArrayObj(resultPtr, (BYTE *) Tcl_DStringValue(&data), (int) length); } Tcl_DStringFree(&data); return result; @@ -1327,7 +1327,7 @@ SetValue( (BYTE*)data, (DWORD) length); Tcl_DStringFree(&buf); } else { - char *data; + BYTE *data; /* * Store binary data in the registry. @@ -1335,7 +1335,7 @@ SetValue( data = Tcl_GetByteArrayFromObj(dataObj, &length); result = (*regWinProcs->regSetValueExProc)(key, valueName, 0, type, - (BYTE *)data, (DWORD) length); + data, (DWORD) length); } Tcl_DStringFree(&nameBuf); RegCloseKey(key); @@ -1371,7 +1371,8 @@ BroadcastValue( int objc, /* Number of arguments. */ Tcl_Obj * CONST objv[]) /* Argument values. */ { - LRESULT result, sendResult; + LRESULT result; + DWORD_PTR sendResult; UINT timeout = 3000; int len; char *str; |