diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2004-06-05 17:25:39 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2004-06-05 17:25:39 (GMT) |
| commit | a1a9fa86902eae4d02cbe6b9415a3bc8e0609277 (patch) | |
| tree | 617dc620eece18a088428f04a8adc51bba840ae6 /generic/tcl.h | |
| parent | 82bd902b0af8b51295647f43a1610ca1f37ae613 (diff) | |
| download | tcl-a1a9fa86902eae4d02cbe6b9415a3bc8e0609277.zip tcl-a1a9fa86902eae4d02cbe6b9415a3bc8e0609277.tar.gz tcl-a1a9fa86902eae4d02cbe6b9415a3bc8e0609277.tar.bz2 | |
* generic/tcl.h: Corrected Tcl_WideInt declarations so that the mingw
build works again.
* generic/tclInt.decls: Changes to the tests for
* generic/tclIntPlatDecls.h: clock frequency in Tcl_WinTime
* generic/tclStubInit.c: so that any clock frequency
* tests/platform.test (platform-1.3): is accepted provided that
* win/tclWin32Dll.c (TclWinCPUID): all CPU's in the system share
* win/tclWinTest.c (TestwincpuidCmd): a common chip, and hence,
* win/tclWinTime.c (Tcl_GetTime): presumably, a common clock. This
change necessitated a 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 | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index 68f9ee6..dd214de 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.153.2.11 2004/02/13 01:38:00 hobbs Exp $ + * RCS: @(#) $Id: tcl.h,v 1.153.2.12 2004/06/05 17:25:39 kennykb Exp $ */ #ifndef _TCL @@ -352,11 +352,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 +# if defined(__WIN32__) && !defined(__CYGWIN__) +# define TCL_LL_MODIFIER "I64" +# define TCL_LL_MODIFIER_SIZE 3 +# else # define TCL_LL_MODIFIER "L" -typedef struct stat Tcl_StatBuf; # define TCL_LL_MODIFIER_SIZE 1 +# endif +typedef struct stat Tcl_StatBuf; # elif defined(__WIN32__) # define TCL_WIDE_INT_TYPE __int64 # ifdef __BORLANDC__ |