Index: win/tclWinTest.c
===================================================================
RCS file: /cvsroot/tcl/tcl/win/tclWinTest.c,v
retrieving revision 1.26
diff -u -r1.26 tclWinTest.c
--- win/tclWinTest.c	18 Nov 2009 23:46:05 -0000	1.26
+++ win/tclWinTest.c	4 May 2010 09:34:11 -0000
@@ -11,6 +11,9 @@
  * RCS: @(#) $Id: tclWinTest.c,v 1.26 2009/11/18 23:46:05 nijtmans Exp $
  */
 
+/* TODO: This file does not compile in UNICODE mode. */
+#undef UNICODE
+#undef _UNICODE
 #ifndef USE_TCL_STUBS
 #   define USE_TCL_STUBS
 #endif
Index: win/tclWinReg.c
===================================================================
RCS file: /cvsroot/tcl/tcl/win/tclWinReg.c,v
retrieving revision 1.53
diff -u -r1.53 tclWinReg.c
--- win/tclWinReg.c	2 Apr 2010 19:27:44 -0000	1.53
+++ win/tclWinReg.c	4 May 2010 09:34:10 -0000
@@ -14,6 +14,9 @@
  * RCS: @(#) $Id: tclWinReg.c,v 1.53 2010/04/02 19:27:44 kennykb Exp $
  */
 
+/* TODO: This file does not compile in UNICODE mode. */
+#undef UNICODE
+#undef _UNICODE
 #undef STATIC_BUILD
 #ifndef USE_TCL_STUBS
 #   define USE_TCL_STUBS
Index: win/tclWinDde.c
===================================================================
RCS file: /cvsroot/tcl/tcl/win/tclWinDde.c,v
retrieving revision 1.42
diff -u -r1.42 tclWinDde.c
--- win/tclWinDde.c	7 Mar 2010 14:39:25 -0000	1.42
+++ win/tclWinDde.c	4 May 2010 09:34:08 -0000
@@ -12,6 +12,9 @@
  * RCS: @(#) $Id: tclWinDde.c,v 1.42 2010/03/07 14:39:25 nijtmans Exp $
  */
 
+/* TODO: This file does not compile in UNICODE mode. */
+#undef UNICODE
+#undef _UNICODE
 #undef STATIC_BUILD
 #ifndef USE_TCL_STUBS
 #   define USE_TCL_STUBS
