diff options
author | hobbs <hobbs> | 2003-04-18 20:17:33 (GMT) |
---|---|---|
committer | hobbs <hobbs> | 2003-04-18 20:17:33 (GMT) |
commit | 5f318bb2a6eff62e04021e5d2c49f82cbc24c6c3 (patch) | |
tree | 10887376d763e5d0810775e1b4390815482c3a49 | |
parent | 229573d81bd4d08e619a3f30e653d27cfd880803 (diff) | |
download | tcl-5f318bb2a6eff62e04021e5d2c49f82cbc24c6c3.zip tcl-5f318bb2a6eff62e04021e5d2c49f82cbc24c6c3.tar.gz tcl-5f318bb2a6eff62e04021e5d2c49f82cbc24c6c3.tar.bz2 |
* win/tclWinInt.h (VER_PLATFORM_WIN32_CE): conditionally define.
* win/tclWinInit.c: recognize Windows CE as a Win platform.
This just recognizes CE - full support will come later.
-rw-r--r-- | ChangeLog | 53 | ||||
-rw-r--r-- | win/tclWinInit.c | 6 | ||||
-rw-r--r-- | win/tclWinInt.h | 6 |
3 files changed, 41 insertions, 24 deletions
@@ -1,3 +1,16 @@ +2003-04-18 Jeff Hobbs <jeffh@ActiveState.com> + + * win/tclWinInt.h (VER_PLATFORM_WIN32_CE): conditionally define. + * win/tclWinInit.c: recognize Windows CE as a Win platform. + This just recognizes CE - full support will come later. + + * win/configure: regen + * win/configure.in (SHELL): force it to /bin/sh as autoconf 2.5x + uses /bin/bash, which can fail to find exes in the path (ie: lib). + + * generic/tclExecute.c (ExprCallMathFunc): remove incorrect + extraneous cast from Tcl_WideAsDouble. + 2003-04-18 Donal K. Fellows <fellowsd@cs.man.ac.uk> * doc/open.n: Moved serial port options from [fconfigure] @@ -7,26 +20,26 @@ 2003-04-16 Don Porter <dgp@users.sourceforge.net> - * generic/tcl.h Made changes so that the "wideInt" Tcl_ObjType - * generic/tclObj.c is defined on all platforms, even those where - * generic/tclPort.h TCL_WIDE_INT_IS_LONG is defined. Also made - the Tcl_Value struct have a wideValue field on all platforms. This is - a ***POTENTIAL INCOMPATIBILITY*** for TCL_WIDE_INT_IS_LONG platforms - because that struct changes size. This is the same TIP 72 - incompatibility that was seen on other platforms at the 8.4.0 release, - when this change should have happened as well. [Bug 713562] - - * generic/tclInt.h: New internal macros TclGetWide() and - TclGetLongFromWide() to deal with both forms of the "wideInt" - Tcl_ObjType, so that conditional TCL_WIDE_INT_IS_LONG code - is confined to the header file. - - * generic/tclCmdAH.c: Replaced most coding that was conditional - * generic/tclCmdIL.c: on TCL_WIDE_INT_IS_LONG with code that - * generic/tclExecute.c: works across platforms, sometimes using - * generic/tclTest.c: the new macros above to do it. - * generic/tclUtil.c: - * generic/tclVar.c: + * generic/tcl.h: Made changes so that the "wideInt" Tcl_ObjType + * generic/tclObj.c: is defined on all platforms, even those where + * generic/tclPort.h: TCL_WIDE_INT_IS_LONG is defined. Also made + the Tcl_Value struct have a wideValue field on all platforms. This is + a ***POTENTIAL INCOMPATIBILITY*** for TCL_WIDE_INT_IS_LONG platforms + because that struct changes size. This is the same TIP 72 + incompatibility that was seen on other platforms at the 8.4.0 release, + when this change should have happened as well. [Bug 713562] + + * generic/tclInt.h: New internal macros TclGetWide() and + TclGetLongFromWide() to deal with both forms of the "wideInt" + Tcl_ObjType, so that conditional TCL_WIDE_INT_IS_LONG code + is confined to the header file. + + * generic/tclCmdAH.c: Replaced most coding that was conditional + * generic/tclCmdIL.c: on TCL_WIDE_INT_IS_LONG with code that + * generic/tclExecute.c: works across platforms, sometimes using + * generic/tclTest.c: the new macros above to do it. + * generic/tclUtil.c: + * generic/tclVar.c: 2003-04-17 Donal K. Fellows <fellowsd@cs.man.ac.uk> 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 |