From ec0ec07bd5f396c9676772d8a8c84b9eec8e24a1 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Thu, 14 Feb 2002 07:32:17 +0000
Subject: [PATCH] [project @ 2002-02-14 07:32:17 by sof] mingw: support
 timezone and tzname (as before)

---
 System/Time.hsc |    6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/System/Time.hsc b/System/Time.hsc
index cd26453..7cdbd05 100644
--- a/System/Time.hsc
+++ b/System/Time.hsc
@@ -8,7 +8,7 @@
 -- Stability   :  provisional
 -- Portability :  portable
 --
--- $Id: Time.hsc,v 1.8 2002/02/11 12:29:27 simonmar Exp $
+-- $Id: Time.hsc,v 1.9 2002/02/14 07:32:17 sof Exp $
 --
 -- The standard Time library.
 --
@@ -319,8 +319,8 @@ gmtoff x    = (#peek struct tm,tm_gmtoff) x
 #  ifndef mingw32_TARGET_OS
 foreign label tzname :: Ptr (Ptr CChar)
 #  else
-foreign import "ghcTimezone" unsafe timezone :: Ptr CLong
-foreign import "ghcTzname" unsafe tzname :: Ptr (Ptr CChar)
+foreign import "__hscore_timezone" unsafe timezone :: Ptr CLong
+foreign import "__hscore_tzname" unsafe tzname :: Ptr (Ptr CChar)
 #  endif
 zone x = do 
   dst <- (#peek struct tm,tm_isdst) x
-- 
1.7.10.4