diff options
author | Kevin B Kenny <kennykb@acm.org> | 2004-06-05 17:31:08 (GMT) |
---|---|---|
committer | Kevin B Kenny <kennykb@acm.org> | 2004-06-05 17:31:08 (GMT) |
commit | eab8709992e59240799ae71ebdd5b6e48bc9d5c0 (patch) | |
tree | 41f21e9ad830c0964087f8b4d6b564c1f631d6ca /generic/tcl.h | |
parent | 9baeae995f31e23bd116f478c93131015e25e069 (diff) | |
download | tcl-eab8709992e59240799ae71ebdd5b6e48bc9d5c0.zip tcl-eab8709992e59240799ae71ebdd5b6e48bc9d5c0.tar.gz tcl-eab8709992e59240799ae71ebdd5b6e48bc9d5c0.tar.bz2 |
* generic/tcl.h: Corrected Tcl_WideInt declarations so that the mingw
build works again.
* generic/tclDecls.h: Changes to the tests for
* generic/tclInt.decls: clock frequency in
* generic/tclIntDecls.h: Tcl_WinTime
* generic/tclIntPlatDecls.h: so that any clock frequency
* generic/tclPlatDecls.h: is accepted provided that
* generic/tclStubInit.c: all CPU's in the system share
* tests/platform.test (platform-1.3): a common chip, and hence,
* win/tclWin32Dll.c (TclWinCPUID): presumably, a common clock.
* win/tclWinTest.c (TestwincpuidCmd) This change necessitated a
* win/tclWinTime.c (Tcl_GetTime): small burst of assembly code
to read CPU ID information, which was added as TclWinCPUID in the
internal Stubs. To test this code in the common case of a
single-processor machine, a 'testwincpuid' command was added to
tclWinTest.c, and a test case in platform.test. Thanks to Jeff
Godfrey and Richard Suchenwirth for reporting this bug. [Bug
#976722]
Diffstat (limited to 'generic/tcl.h')
-rw-r--r-- | generic/tcl.h | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index ccbb453..26ec95b 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tcl.h,v 1.180 2004/06/04 20:17:10 dgp Exp $ + * RCS: @(#) $Id: tcl.h,v 1.181 2004/06/05 17:31:08 kennykb Exp $ */ #ifndef _TCL @@ -341,11 +341,16 @@ typedef long LONG; */ #if !defined(TCL_WIDE_INT_TYPE)&&!defined(TCL_WIDE_INT_IS_LONG) -# if defined(__CYGWIN__) +# if defined(__GNUC__) # define TCL_WIDE_INT_TYPE long long -# define TCL_LL_MODIFIER "L" +# if defined(__WIN32__) && !defined(__CYGWIN__) +# define TCL_LL_MODIFIER "I64" +# define TCL_LL_MODIFIER_SIZE 3 +# else +# define TCL_LL_MODIFIER "L" +# define TCL_LL_MODIFIER_SIZE 1 +# endif typedef struct stat Tcl_StatBuf; -# define TCL_LL_MODIFIER_SIZE 1 # elif defined(__WIN32__) # define TCL_WIDE_INT_TYPE __int64 # ifdef __BORLANDC__ |