diff options
| -rw-r--r-- | ChangeLog | 1 | ||||
| -rw-r--r-- | win/tclWinReg.c | 6 |
2 files changed, 3 insertions, 4 deletions
@@ -19,7 +19,6 @@ * win/tclWinInit.c * win/tclWinChan.c * win/tclWinConsole.c - * win/tclWinFile.c * win/tclWinNotify.c * win/tclWinReg.c * library/auto.tcl Eliminate "then" keyword diff --git a/win/tclWinReg.c b/win/tclWinReg.c index 849e9a9..e6d5b7a 100644 --- a/win/tclWinReg.c +++ b/win/tclWinReg.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinReg.c,v 1.46 2009/08/16 10:20:19 nijtmans Exp $ + * RCS: @(#) $Id: tclWinReg.c,v 1.47 2009/11/18 22:02:58 nijtmans Exp $ */ #include "tclInt.h" @@ -742,7 +742,7 @@ GetType( * know about the type, just use the numeric value. */ - if (type > lastType || type < 0) { + if (type > lastType) { Tcl_SetObjResult(interp, Tcl_NewIntObj((int) type)); } else { Tcl_SetObjResult(interp, Tcl_NewStringObj(typeNames[type], -1)); @@ -1602,7 +1602,7 @@ ConvertDWORD( */ localType = (*((char*) &order) == 1) ? REG_DWORD : REG_DWORD_BIG_ENDIAN; - return (type != localType) ? SWAPLONG(value) : value; + return (type != localType) ? (DWORD)SWAPLONG(value) : value; } /* |