[commit: packages/time] format-widths, improve-leapseconds, master, posix-perf, tasty, wip/travis: CFILES directive for the benefit of Hugs (76bf7f8)

git at git.haskell.org git at git.haskell.org
Mon Feb 20 21:10:42 UTC 2017


Repository : ssh://git@git.haskell.org/time

On branches: format-widths,improve-leapseconds,master,posix-perf,tasty,wip/travis
Link       : http://git.haskell.org/packages/time.git/commitdiff/76bf7f82a6d883d933b97f1187aef79cd3cebbfb

>---------------------------------------------------------------

commit 76bf7f82a6d883d933b97f1187aef79cd3cebbfb
Author: Ross Paterson <ross at soi.city.ac.uk>
Date:   Tue May 30 16:29:48 2006 -0700

    CFILES directive for the benefit of Hugs
    
    darcs-hash:20060530232948-b47d3-2ff97506454a770200384abb80b730d91a45c73d


>---------------------------------------------------------------

76bf7f82a6d883d933b97f1187aef79cd3cebbfb
 Data/Time/LocalTime/TimeZone.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Data/Time/LocalTime/TimeZone.hs b/Data/Time/LocalTime/TimeZone.hs
index 07c1c01..d80671e 100644
--- a/Data/Time/LocalTime/TimeZone.hs
+++ b/Data/Time/LocalTime/TimeZone.hs
@@ -52,6 +52,7 @@ instance Show TimeZone where
 utc :: TimeZone
 utc = TimeZone 0 False "UTC"
 
+{-# CFILES cbits/HsTime.c #-}
 foreign import ccall unsafe "HsTime.h get_current_timezone_seconds" get_current_timezone_seconds :: CTime -> Ptr CInt -> Ptr CString -> IO CLong
 
 posixToCTime :: POSIXTime -> CTime



More information about the ghc-commits mailing list