summaryrefslogtreecommitdiffstats
path: root/win/tclWinTime.c
diff options
context:
space:
mode:
authormdejong <mdejong>2003-01-27 02:19:55 (GMT)
committermdejong <mdejong>2003-01-27 02:19:55 (GMT)
commit60b96992277a21af6c79074d66edf3a069abf734 (patch)
tree83788b8dece0b2e2e04f753732f38c93a6efa6e1 /win/tclWinTime.c
parentbb7fd9a6b22b81948f940088e8e810b7d3673fd1 (diff)
downloadtcl-60b96992277a21af6c79074d66edf3a069abf734.zip
tcl-60b96992277a21af6c79074d66edf3a069abf734.tar.gz
tcl-60b96992277a21af6c79074d66edf3a069abf734.tar.bz2
* win/configure: Regen.
* win/configure.in: Add test that checks to see if the compiler can cast to a union type. * win/tclWinTime.c: Squelch compiler warning about union initializer by casting to union type when compiling with gcc.
Diffstat (limited to 'win/tclWinTime.c')
-rw-r--r--win/tclWinTime.c28
1 files changed, 17 insertions, 11 deletions
diff --git a/win/tclWinTime.c b/win/tclWinTime.c
index 13d1a4e..70ab93d 100644
--- a/win/tclWinTime.c
+++ b/win/tclWinTime.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclWinTime.c,v 1.12 2002/11/26 22:35:21 davygrvy Exp $
+ * RCS: @(#) $Id: tclWinTime.c,v 1.13 2003/01/27 02:19:57 mdejong Exp $
*/
#include "tclWinInt.h"
@@ -99,16 +99,22 @@ typedef struct TimeInfo {
} TimeInfo;
static TimeInfo timeInfo = {
- { NULL },
- 0,
- 0,
- (HANDLE) NULL,
- (HANDLE) NULL,
- (HANDLE) NULL,
- 0,
- 0,
- 0,
- 0,
+ { NULL },
+ 0,
+ 0,
+ (HANDLE) NULL,
+ (HANDLE) NULL,
+ (HANDLE) NULL,
+#ifdef HAVE_CAST_TO_UNION
+ (ULARGE_INTEGER) (DWORDLONG) 0,
+ (LARGE_INTEGER) (LONGLONG) 0,
+ (LARGE_INTEGER) (LONGLONG) 0,
+#else
+ 0,
+ 0,
+ 0,
+#endif
+ 0,
0,
0
};