summaryrefslogtreecommitdiffstats
path: root/win
diff options
context:
space:
mode:
Diffstat (limited to 'win')
-rw-r--r--win/tclWinInit.c6
-rw-r--r--win/tclWinInt.h6
2 files changed, 8 insertions, 4 deletions
diff --git a/win/tclWinInit.c b/win/tclWinInit.c
index 2ab64a3..e913272 100644
--- a/win/tclWinInit.c
+++ b/win/tclWinInit.c
@@ -7,7 +7,7 @@
* Copyright (c) 1998-1999 by Scriptics Corporation.
* All rights reserved.
*
- * RCS: @(#) $Id: tclWinInit.c,v 1.40 2003/02/27 03:47:09 chengyemao Exp $
+ * RCS: @(#) $Id: tclWinInit.c,v 1.41 2003/04/18 20:17:42 hobbs Exp $
*/
#include "tclWinInt.h"
@@ -68,9 +68,9 @@ typedef struct {
*/
-#define NUMPLATFORMS 3
+#define NUMPLATFORMS 4
static char* platforms[NUMPLATFORMS] = {
- "Win32s", "Windows 95", "Windows NT"
+ "Win32s", "Windows 95", "Windows NT", "Windows CE"
};
#define NUMPROCESSORS 9
diff --git a/win/tclWinInt.h b/win/tclWinInt.h
index c2fe5ae..d953c5b 100644
--- a/win/tclWinInt.h
+++ b/win/tclWinInt.h
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclWinInt.h,v 1.21 2003/04/11 16:00:17 vincentdarley Exp $
+ * RCS: @(#) $Id: tclWinInt.h,v 1.22 2003/04/18 20:17:45 hobbs Exp $
*/
#ifndef _TCLWININT
@@ -37,11 +37,15 @@
/*
* Some versions of Borland C have a define for the OSVERSIONINFO for
* Win32s and for NT, but not for Windows 95.
+ * Define VER_PLATFORM_WIN32_CE for those without newer headers.
*/
#ifndef VER_PLATFORM_WIN32_WINDOWS
#define VER_PLATFORM_WIN32_WINDOWS 1
#endif
+#ifndef VER_PLATFORM_WIN32_CE
+#define VER_PLATFORM_WIN32_CE 3
+#endif
/*
* The following structure keeps track of whether we are using the