diff options
| author | sebres <sebres@users.sourceforge.net> | 2017-02-09 13:50:27 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2017-02-09 13:50:27 (GMT) |
| commit | d5c91a755cafe40630668464ed4e070fdd647852 (patch) | |
| tree | 71a5c042d24a0725f34d7ee12fd645fa107274a6 /generic/tclInt.h | |
| parent | 3d05f0dbea4bb0c707a1ae59adae786c6d5cd43e (diff) | |
| parent | c88fb138612db4499a9e841453cd14bfd5db7224 (diff) | |
| download | tcl-d5c91a755cafe40630668464ed4e070fdd647852.zip tcl-d5c91a755cafe40630668464ed4e070fdd647852.tar.gz tcl-d5c91a755cafe40630668464ed4e070fdd647852.tar.bz2 | |
merge sebres-trunk-timerate
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 15cb355..2ba1123 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -3187,10 +3187,22 @@ MODULE_SCOPE int TclpLoadMemory(Tcl_Interp *interp, void *buffer, MODULE_SCOPE void TclInitThreadStorage(void); MODULE_SCOPE void TclFinalizeThreadDataThread(void); MODULE_SCOPE void TclFinalizeThreadStorage(void); + #ifdef TCL_WIDE_CLICKS MODULE_SCOPE Tcl_WideInt TclpGetWideClicks(void); MODULE_SCOPE double TclpWideClicksToNanoseconds(Tcl_WideInt clicks); +MODULE_SCOPE double TclpWideClickInMicrosec(void); +#else +# ifdef _WIN32 +# define TCL_WIDE_CLICKS 1 +MODULE_SCOPE Tcl_WideInt TclpGetWideClicks(void); +MODULE_SCOPE double TclpWideClickInMicrosec(void); +# define TclpWideClicksToNanoseconds(clicks) \ + ((double)(clicks) * TclpWideClickInMicrosec() * 1000) +# endif #endif +MODULE_SCOPE Tcl_WideInt TclpGetMicroseconds(void); + MODULE_SCOPE int TclZlibInit(Tcl_Interp *interp); MODULE_SCOPE void * TclpThreadCreateKey(void); MODULE_SCOPE void TclpThreadDeleteKey(void *keyPtr); |