Remove Control.Parallel*, now in package parallel

[haskell-directory.git] / cbits / timeUtils.c

diff --git a/cbits/timeUtils.c b/cbits/timeUtils.c
index ca868e2..64d5044 100644 (file)
--- a/cbits/timeUtils.c
+++ b/cbits/timeUtils.c
@@ -5,11 +5,11 @@
  */
 #include "HsBase.h"
 
-#if defined(mingw32_TARGET_OS) /* to the end */
+#if defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32) /* to the end */
 
-HsAddr __hscore_timezone( void )
-{ return (HsAddr)&_timezone; }
+long *__hscore_timezone( void )
+{ return &_timezone; }
 
-HsAddr __hscore_tzname( void )
-{ return (HsAddr)_tzname; }
+char **__hscore_tzname( void )
+{ return _tzname; }
 #endif