diff options
author | hobbs <hobbs@noemail.net> | 2003-01-16 20:55:53 (GMT) |
---|---|---|
committer | hobbs <hobbs@noemail.net> | 2003-01-16 20:55:53 (GMT) |
commit | 1c92ba8a5245f5d2be40d830eb21d1aff680c536 (patch) | |
tree | 706d4cdb8804cfab5d5f86c6c6ae84de8299e03b /win/tclWinSerial.c | |
parent | f7278d4e4f4ac20dabbe05a764a309ce71e3e7b2 (diff) | |
download | tcl-1c92ba8a5245f5d2be40d830eb21d1aff680c536.zip tcl-1c92ba8a5245f5d2be40d830eb21d1aff680c536.tar.gz tcl-1c92ba8a5245f5d2be40d830eb21d1aff680c536.tar.bz2 |
* win/tclWinSerial.c (SerialOutputProc): add casts for
bytesWritten to allow strict compilation (no warnings).
FossilOrigin-Name: 3beb6c773944ff0ea66b7a8e74f295a2afa5e2da
Diffstat (limited to 'win/tclWinSerial.c')
-rw-r--r-- | win/tclWinSerial.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/win/tclWinSerial.c b/win/tclWinSerial.c index 582947a..fb819a2 100644 --- a/win/tclWinSerial.c +++ b/win/tclWinSerial.c @@ -11,7 +11,7 @@ * * Serial functionality implemented by Rolf.Schroedter@dlr.de * - * RCS: @(#) $Id: tclWinSerial.c,v 1.24 2003/01/16 19:02:00 mdejong Exp $ + * RCS: @(#) $Id: tclWinSerial.c,v 1.25 2003/01/16 20:55:53 hobbs Exp $ */ #include "tclWinInt.h" @@ -1034,7 +1034,7 @@ SerialOutputProc( infoPtr->toWrite = toWrite; ResetEvent(infoPtr->evWritable); SetEvent(infoPtr->evStartWriter); - bytesWritten = toWrite; + bytesWritten = (DWORD) toWrite; } else { /* @@ -1045,7 +1045,7 @@ SerialOutputProc( &bytesWritten, &infoPtr->osWrite) ) { goto writeError; } - if (bytesWritten != toWrite) { + if (bytesWritten != (DWORD) toWrite) { /* Write timeout */ infoPtr->lastError |= CE_PTO; errno = EIO; @@ -1053,7 +1053,7 @@ SerialOutputProc( } } - return bytesWritten; + return (int) bytesWritten; writeError: TclWinConvertError(GetLastError()); |