Win32 2.8.1.0 → 2.8.2.0

raw patch · 3 files changed

+7/−4 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• Graphics/Win32/Window.hsc +2/−3
• Win32.cabal +1/−1
• changelog.md +4/−0

@@ -1,5 +1,4 @@ {-# LANGUAGE CApiFFI #-}-{-# LANGUAGE NegativeLiterals #-} {-# LANGUAGE Trustworthy #-} ----------------------------------------------------------------------------- -- |@@ -682,7 +681,7 @@  getMessage :: LPMSG -> Maybe HWND -> IO Bool getMessage msg mb_wnd = do-  res <- failIf (== -1) "GetMessage" $+  res <- failIf (== maxBound) "GetMessage" $     c_GetMessage msg (maybePtr mb_wnd) 0 0   return (res /= 0) foreign import WINDOWS_CCONV "windows.h GetMessageW"@@ -694,7 +693,7 @@  peekMessage :: LPMSG -> Maybe HWND -> UINT -> UINT -> UINT -> IO () peekMessage msg mb_wnd filterMin filterMax remove = do-  failIf_ (== -1) "PeekMessage" $+  failIf_ (== maxBound) "PeekMessage" $     c_PeekMessage msg (maybePtr mb_wnd) filterMin filterMax remove foreign import WINDOWS_CCONV "windows.h PeekMessageW"   c_PeekMessage :: LPMSG -> HWND -> UINT -> UINT -> UINT -> IO LONG

@@ -1,5 +1,5 @@ name:		Win32-version:	2.8.1.0+version:	2.8.2.0 license:	BSD3 license-file:	LICENSE author:		Alastair Reid, shelarcy, Tamar Christina

@@ -1,5 +1,9 @@ # Changelog for [`Win32` package](http://hackage.haskell.org/package/Win32) +## 2.8.2.0 *Dec 2018*++* Drop use of NegativeLiterals (See #118)+ ## 2.8.1.0 *Nov 2018*  * Fix broken links (See #116)