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 | 76a3df0646c3adbd6aafd8a405b1ea67bf4df521 (patch) | |
| tree | 617dc620eece18a088428f04a8adc51bba840ae6 /generic/tclInt.decls | |
| parent | 7cdb9381ace2de8072be890f8225e4bbb21425bd (diff) | |
| download | tcl-76a3df0646c3adbd6aafd8a405b1ea67bf4df521.zip tcl-76a3df0646c3adbd6aafd8a405b1ea67bf4df521.tar.gz tcl-76a3df0646c3adbd6aafd8a405b1ea67bf4df521.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/tclInt.decls')
| -rw-r--r-- | generic/tclInt.decls | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls index d1dfc9b..b8a2291 100644 --- a/generic/tclInt.decls +++ b/generic/tclInt.decls @@ -12,7 +12,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: tclInt.decls,v 1.59.2.2 2004/05/17 14:26:49 kennykb Exp $ +# RCS: @(#) $Id: tclInt.decls,v 1.59.2.3 2004/06/05 17:25:40 kennykb Exp $ library tcl @@ -937,6 +937,10 @@ declare 28 win { void TclWinResetInterfaces(void) } +declare 29 win { + int TclWinCPUID( unsigned int index, unsigned int *regs ) +} + ######################### # Unix specific internals |