[commit: packages/haskeline] master: Suppress hsc2hs-related warning on GHC HEAD (576e7cb)

git at git.haskell.org git at git.haskell.org
Thu Dec 31 22:40:38 UTC 2015


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

On branch  : master
Link       : http://git.haskell.org/packages/haskeline.git/commitdiff/576e7cbc4cde1195fb97c8540caad38de8d7e681

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

commit 576e7cbc4cde1195fb97c8540caad38de8d7e681
Author: RyanGlScott <ryan.gl.scott at gmail.com>
Date:   Wed Dec 23 17:35:52 2015 -0600

    Suppress hsc2hs-related warning on GHC HEAD


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

576e7cbc4cde1195fb97c8540caad38de8d7e681
 System/Console/Haskeline/Backend/Win32.hsc | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/System/Console/Haskeline/Backend/Win32.hsc b/System/Console/Haskeline/Backend/Win32.hsc
index b88dc3c..d9c0934 100644
--- a/System/Console/Haskeline/Backend/Win32.hsc
+++ b/System/Console/Haskeline/Backend/Win32.hsc
@@ -167,7 +167,9 @@ getKeyEvent p = do
 data Coord = Coord {coordX, coordY :: Int}
                 deriving Show
 
+#if __GLASGOW_HASKELL__ < 711
 #let alignment t = "%lu", (unsigned long)offsetof(struct {char x__; t (y__); }, y__)
+#endif
 instance Storable Coord where
     sizeOf _ = (#size COORD)
     alignment _ = (#alignment COORD)



More information about the ghc-commits mailing list