Posted to tcl by colin at Sun Sep 13 14:49:33 GMT 2009view pretty

diff -c ./tclWin32Dll.c /home/colin/Desktop/packages/tcl/win/tclWin32Dll.c
*** ./tclWin32Dll.c	2009-09-13 23:51:48.000000000 +1000
--- /home/colin/Desktop/packages/tcl/win/tclWin32Dll.c	2009-09-01 08:44:38.000000000 +1000
***************
*** 14,20 ****
   */
  
  #include "tclWinInt.h"
- #include "tclWinPort.h"
  
  /*
   * The following data structures are used when loading the thunking library
--- 14,19 ----
diff -c ./tclWinChan.c /home/colin/Desktop/packages/tcl/win/tclWinChan.c
*** ./tclWinChan.c	2009-09-13 23:54:24.000000000 +1000
--- /home/colin/Desktop/packages/tcl/win/tclWinChan.c	2009-01-05 10:02:41.000000000 +1100
***************
*** 415,426 ****
       */
  
      if (!TclInThreadExit()
- #ifndef __WINCE__
  	    || ((GetStdHandle(STD_INPUT_HANDLE) != fileInfoPtr->handle)
  	    &&  (GetStdHandle(STD_OUTPUT_HANDLE) != fileInfoPtr->handle)
! 	    &&  (GetStdHandle(STD_ERROR_HANDLE) != fileInfoPtr->handle))
! #endif
! ) {
  	if (CloseHandle(fileInfoPtr->handle) == FALSE) {
  	    TclWinConvertError(GetLastError());
  	    errorCode = errno;
--- 415,423 ----
       */
  
      if (!TclInThreadExit()
  	    || ((GetStdHandle(STD_INPUT_HANDLE) != fileInfoPtr->handle)
  	    &&  (GetStdHandle(STD_OUTPUT_HANDLE) != fileInfoPtr->handle)
! 	    &&  (GetStdHandle(STD_ERROR_HANDLE) != fileInfoPtr->handle))) {
  	if (CloseHandle(fileInfoPtr->handle) == FALSE) {
  	    TclWinConvertError(GetLastError());
  	    errorCode = errno;
diff -c ./tclWinPort.h /home/colin/Desktop/packages/tcl/win/tclWinPort.h
*** ./tclWinPort.h	2009-09-14 00:00:18.000000000 +1000
--- /home/colin/Desktop/packages/tcl/win/tclWinPort.h	2009-09-02 15:41:59.000000000 +1000
***************
*** 32,43 ****
   *---------------------------------------------------------------------------
   */
  
- #if defined(__MINGW32CE__)
- #undef	_NO_OLDNAMES
- #include <wchar.h>
- #undef __COREDLL__
- #endif
- 
  #include <stdio.h>
  #include <stdlib.h>
  
--- 32,37 ----