diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-17 17:33:30 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-17 17:33:30 (GMT) |
| commit | 820f87726f851ed6938105e54b9d402288cf40f0 (patch) | |
| tree | d1c10e2c87b6aacbc541e86c58396d923a41e5ae /generic/tclInt.h | |
| parent | bf552f0a4d5c314940d025c46551b4e5062c59ac (diff) | |
| parent | e246b44499e406683adac8035e53d08b4dc0192a (diff) | |
| download | tcl-820f87726f851ed6938105e54b9d402288cf40f0.zip tcl-820f87726f851ed6938105e54b9d402288cf40f0.tar.gz tcl-820f87726f851ed6938105e54b9d402288cf40f0.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 30d108b..e16aade 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4900,32 +4900,6 @@ MODULE_SCOPE Tcl_LibraryInitProc Procbodytest_SafeInit; /* *---------------------------------------------------------------- - * Macros used by the Tcl core to test for some special double values. - * The ANSI C "prototypes" for these macros are: - * - * MODULE_SCOPE int TclIsInfinite(double d); - * MODULE_SCOPE int TclIsNaN(double d); - */ - -#ifdef _MSC_VER -# define TclIsInfinite(d) (!(_finite((d)))) -# define TclIsNaN(d) (_isnan((d))) -#else -# define TclIsInfinite(d) ((d) > DBL_MAX || (d) < -DBL_MAX) -# ifdef NO_ISNAN -# define TclIsNaN(d) ((d) != (d)) -# else -# define TclIsNaN(d) (isnan(d)) -# endif -#endif - -/* Workaround for platforms missing offsetof(), e.g. VC++ 6.0 */ -#ifndef offsetof -# define offsetof(type, field) ((size_t) ((char *) &((type *) 0)->field)) -#endif - -/* - *---------------------------------------------------------------- * Inline version of Tcl_GetCurrentNamespace and Tcl_GetGlobalNamespace. */ |