packages feed

Win32 2.8.0.0 → 2.8.1.0

raw patch · 42 files changed

+80/−92 lines, 42 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

+ System.Win32: cP_ACP :: CodePage
+ System.Win32: cP_MACCP :: CodePage
+ System.Win32: cP_OEMCP :: CodePage
+ System.Win32: c_LCMapString :: LCID -> LCMapFlags -> LPCTSTR -> Int -> LPCTSTR -> Int -> IO Int
+ System.Win32: c_SetLocaleInfo :: LCID -> LCTYPE -> LPCTSTR -> IO Bool
+ System.Win32: convertDefaultLocale :: LCID -> IO LCID
+ System.Win32: getACP :: IO CodePage
+ System.Win32: getOEMCP :: CodePage
+ System.Win32: getSystemDefaultLCID :: LCID
+ System.Win32: getSystemDefaultLangID :: LANGID
+ System.Win32: getThreadLocale :: IO LCID
+ System.Win32: getUserDefaultLCID :: LCID
+ System.Win32: getUserDefaultLangID :: LANGID
+ System.Win32: isValidCodePage :: CodePage -> IO Bool
+ System.Win32: isValidLocale :: LCID -> LocaleTestFlags -> IO Bool
+ System.Win32: lANG_AFRIKAANS :: PrimaryLANGID
+ System.Win32: lANG_ALBANIAN :: PrimaryLANGID
+ System.Win32: lANG_ARABIC :: PrimaryLANGID
+ System.Win32: lANG_ARMENIAN :: PrimaryLANGID
+ System.Win32: lANG_ASSAMESE :: PrimaryLANGID
+ System.Win32: lANG_AZERI :: PrimaryLANGID
+ System.Win32: lANG_BASQUE :: PrimaryLANGID
+ System.Win32: lANG_BELARUSIAN :: PrimaryLANGID
+ System.Win32: lANG_BENGALI :: PrimaryLANGID
+ System.Win32: lANG_BULGARIAN :: PrimaryLANGID
+ System.Win32: lANG_CATALAN :: PrimaryLANGID
+ System.Win32: lANG_CHINESE :: PrimaryLANGID
+ System.Win32: lANG_CROATIAN :: PrimaryLANGID
+ System.Win32: lANG_CZECH :: PrimaryLANGID
+ System.Win32: lANG_DANISH :: PrimaryLANGID
+ System.Win32: lANG_DUTCH :: PrimaryLANGID
+ System.Win32: lANG_ENGLISH :: PrimaryLANGID
+ System.Win32: lANG_ESTONIAN :: PrimaryLANGID
+ System.Win32: lANG_FAEROESE :: PrimaryLANGID
+ System.Win32: lANG_FARSI :: PrimaryLANGID
+ System.Win32: lANG_FINNISH :: PrimaryLANGID
+ System.Win32: lANG_FRENCH :: PrimaryLANGID
+ System.Win32: lANG_GEORGIAN :: PrimaryLANGID
+ System.Win32: lANG_GERMAN :: PrimaryLANGID
+ System.Win32: lANG_GREEK :: PrimaryLANGID
+ System.Win32: lANG_GUJARATI :: PrimaryLANGID
+ System.Win32: lANG_HEBREW :: PrimaryLANGID
+ System.Win32: lANG_HINDI :: PrimaryLANGID
+ System.Win32: lANG_HUNGARIAN :: PrimaryLANGID
+ System.Win32: lANG_ICELANDIC :: PrimaryLANGID
+ System.Win32: lANG_INDONESIAN :: PrimaryLANGID
+ System.Win32: lANG_ITALIAN :: PrimaryLANGID
+ System.Win32: lANG_JAPANESE :: PrimaryLANGID
+ System.Win32: lANG_KANNADA :: PrimaryLANGID
+ System.Win32: lANG_KASHMIRI :: PrimaryLANGID
+ System.Win32: lANG_KAZAK :: PrimaryLANGID
+ System.Win32: lANG_KONKANI :: PrimaryLANGID
+ System.Win32: lANG_KOREAN :: PrimaryLANGID
+ System.Win32: lANG_LATVIAN :: PrimaryLANGID
+ System.Win32: lANG_LITHUANIAN :: PrimaryLANGID
+ System.Win32: lANG_MACEDONIAN :: PrimaryLANGID
+ System.Win32: lANG_MALAY :: PrimaryLANGID
+ System.Win32: lANG_MALAYALAM :: PrimaryLANGID
+ System.Win32: lANG_MANIPURI :: PrimaryLANGID
+ System.Win32: lANG_MARATHI :: PrimaryLANGID
+ System.Win32: lANG_NEPALI :: PrimaryLANGID
+ System.Win32: lANG_NEUTRAL :: PrimaryLANGID
+ System.Win32: lANG_NORWEGIAN :: PrimaryLANGID
+ System.Win32: lANG_ORIYA :: PrimaryLANGID
+ System.Win32: lANG_POLISH :: PrimaryLANGID
+ System.Win32: lANG_PORTUGUESE :: PrimaryLANGID
+ System.Win32: lANG_PUNJABI :: PrimaryLANGID
+ System.Win32: lANG_ROMANIAN :: PrimaryLANGID
+ System.Win32: lANG_RUSSIAN :: PrimaryLANGID
+ System.Win32: lANG_SANSKRIT :: PrimaryLANGID
+ System.Win32: lANG_SERBIAN :: PrimaryLANGID
+ System.Win32: lANG_SINDHI :: PrimaryLANGID
+ System.Win32: lANG_SLOVAK :: PrimaryLANGID
+ System.Win32: lANG_SLOVENIAN :: PrimaryLANGID
+ System.Win32: lANG_SPANISH :: PrimaryLANGID
+ System.Win32: lANG_SWAHILI :: PrimaryLANGID
+ System.Win32: lANG_SWEDISH :: PrimaryLANGID
+ System.Win32: lANG_TAMIL :: PrimaryLANGID
+ System.Win32: lANG_TATAR :: PrimaryLANGID
+ System.Win32: lANG_TELUGU :: PrimaryLANGID
+ System.Win32: lANG_THAI :: PrimaryLANGID
+ System.Win32: lANG_TURKISH :: PrimaryLANGID
+ System.Win32: lANG_URDU :: PrimaryLANGID
+ System.Win32: lANG_UZBEK :: PrimaryLANGID
+ System.Win32: lANG_VIETNAMESE :: PrimaryLANGID
+ System.Win32: lCID_INSTALLED :: LocaleTestFlags
+ System.Win32: lCID_SUPPORTED :: LocaleTestFlags
+ System.Win32: lCMAP_BYTEREV :: LCMapFlags
+ System.Win32: lCMAP_FULLWIDTH :: LCMapFlags
+ System.Win32: lCMAP_HALFWIDTH :: LCMapFlags
+ System.Win32: lCMAP_HIRAGANA :: LCMapFlags
+ System.Win32: lCMAP_KATAKANA :: LCMapFlags
+ System.Win32: lCMAP_LINGUISTIC_CASING :: LCMapFlags
+ System.Win32: lCMAP_LOWERCASE :: LCMapFlags
+ System.Win32: lCMAP_SIMPLIFIED_CHINESE :: LCMapFlags
+ System.Win32: lCMAP_SORTKEY :: LCMapFlags
+ System.Win32: lCMAP_TRADITIONAL_CHINESE :: LCMapFlags
+ System.Win32: lCMAP_UPPERCASE :: LCMapFlags
+ System.Win32: lCMapString :: LCID -> LCMapFlags -> String -> Int -> IO String
+ System.Win32: lOCALE_ICALENDARTYPE :: LCTYPE
+ System.Win32: lOCALE_ICURRDIGITS :: LCTYPE
+ System.Win32: lOCALE_ICURRENCY :: LCTYPE
+ System.Win32: lOCALE_IDIGITS :: LCTYPE
+ System.Win32: lOCALE_IFIRSTDAYOFWEEK :: LCTYPE
+ System.Win32: lOCALE_IFIRSTWEEKOFYEAR :: LCTYPE
+ System.Win32: lOCALE_ILZERO :: LCTYPE
+ System.Win32: lOCALE_IMEASURE :: LCTYPE
+ System.Win32: lOCALE_INEGCURR :: LCTYPE
+ System.Win32: lOCALE_INEGNUMBER :: LCTYPE
+ System.Win32: lOCALE_ITIME :: LCTYPE
+ System.Win32: lOCALE_NEUTRAL :: LCID
+ System.Win32: lOCALE_S1159 :: LCTYPE
+ System.Win32: lOCALE_S2359 :: LCTYPE
+ System.Win32: lOCALE_SCURRENCY :: LCTYPE
+ System.Win32: lOCALE_SDATE :: LCTYPE
+ System.Win32: lOCALE_SDECIMAL :: LCTYPE
+ System.Win32: lOCALE_SGROUPING :: LCTYPE
+ System.Win32: lOCALE_SLIST :: LCTYPE
+ System.Win32: lOCALE_SLONGDATE :: LCTYPE
+ System.Win32: lOCALE_SMONDECIMALSEP :: LCTYPE
+ System.Win32: lOCALE_SMONGROUPING :: LCTYPE
+ System.Win32: lOCALE_SMONTHOUSANDSEP :: LCTYPE
+ System.Win32: lOCALE_SNEGATIVESIGN :: LCTYPE
+ System.Win32: lOCALE_SPOSITIVESIGN :: LCTYPE
+ System.Win32: lOCALE_SSHORTDATE :: LCTYPE
+ System.Win32: lOCALE_STHOUSAND :: LCTYPE
+ System.Win32: lOCALE_STIME :: LCTYPE
+ System.Win32: lOCALE_STIMEFORMAT :: LCTYPE
+ System.Win32: lOCALE_SYSTEM_DEFAULT :: LCID
+ System.Win32: lOCALE_USER_DEFAULT :: LCID
+ System.Win32: maybeNum :: Num a => Maybe a -> a
+ System.Win32: maybePtr :: Maybe (Ptr a) -> Ptr a
+ System.Win32: multiByteToWideChar :: CodePage -> DWORD -> LPCSTR -> CInt -> LPWSTR -> CInt -> IO CInt
+ System.Win32: nORM_IGNORECASE :: LCMapFlags
+ System.Win32: nORM_IGNOREKANATYPE :: LCMapFlags
+ System.Win32: nORM_IGNORENONSPACE :: LCMapFlags
+ System.Win32: nORM_IGNORESYMBOLS :: LCMapFlags
+ System.Win32: nORM_IGNOREWIDTH :: LCMapFlags
+ System.Win32: numToMaybe :: (Eq a, Num a) => a -> Maybe a
+ System.Win32: peekMaybe :: Storable a => Ptr a -> IO (Maybe a)
+ System.Win32: ptrToMaybe :: Ptr a -> Maybe (Ptr a)
+ System.Win32: sORT_CHINESE_BIG5 :: SortID
+ System.Win32: sORT_CHINESE_UNICODE :: SortID
+ System.Win32: sORT_DEFAULT :: SortID
+ System.Win32: sORT_JAPANESE_UNICODE :: SortID
+ System.Win32: sORT_JAPANESE_XJIS :: SortID
+ System.Win32: sORT_KOREAN_KSC :: SortID
+ System.Win32: sORT_KOREAN_UNICODE :: SortID
+ System.Win32: sORT_STRINGSORT :: LCMapFlags
+ System.Win32: sUBLANG_ARABIC_ALGERIA :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_BAHRAIN :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_EGYPT :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_IRAQ :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_JORDAN :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_KUWAIT :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_LEBANON :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_LIBYA :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_MOROCCO :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_OMAN :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_QATAR :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_SAUDI_ARABIA :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_SYRIA :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_TUNISIA :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_UAE :: SubLANGID
+ System.Win32: sUBLANG_ARABIC_YEMEN :: SubLANGID
+ System.Win32: sUBLANG_AZERI_CYRILLIC :: SubLANGID
+ System.Win32: sUBLANG_AZERI_LATIN :: SubLANGID
+ System.Win32: sUBLANG_CHINESE_HONGKONG :: SubLANGID
+ System.Win32: sUBLANG_CHINESE_MACAU :: SubLANGID
+ System.Win32: sUBLANG_CHINESE_SIMPLIFIED :: SubLANGID
+ System.Win32: sUBLANG_CHINESE_SINGAPORE :: SubLANGID
+ System.Win32: sUBLANG_CHINESE_TRADITIONAL :: SubLANGID
+ System.Win32: sUBLANG_DEFAULT :: SubLANGID
+ System.Win32: sUBLANG_DUTCH :: SubLANGID
+ System.Win32: sUBLANG_DUTCH_BELGIAN :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_AUS :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_BELIZE :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_CAN :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_CARIBBEAN :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_EIRE :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_JAMAICA :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_NZ :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_PHILIPPINES :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_SOUTH_AFRICA :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_TRINIDAD :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_UK :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_US :: SubLANGID
+ System.Win32: sUBLANG_ENGLISH_ZIMBABWE :: SubLANGID
+ System.Win32: sUBLANG_FRENCH :: SubLANGID
+ System.Win32: sUBLANG_FRENCH_BELGIAN :: SubLANGID
+ System.Win32: sUBLANG_FRENCH_CANADIAN :: SubLANGID
+ System.Win32: sUBLANG_FRENCH_LUXEMBOURG :: SubLANGID
+ System.Win32: sUBLANG_FRENCH_MONACO :: SubLANGID
+ System.Win32: sUBLANG_FRENCH_SWISS :: SubLANGID
+ System.Win32: sUBLANG_GERMAN :: SubLANGID
+ System.Win32: sUBLANG_GERMAN_AUSTRIAN :: SubLANGID
+ System.Win32: sUBLANG_GERMAN_LIECHTENSTEIN :: SubLANGID
+ System.Win32: sUBLANG_GERMAN_LUXEMBOURG :: SubLANGID
+ System.Win32: sUBLANG_GERMAN_SWISS :: SubLANGID
+ System.Win32: sUBLANG_ITALIAN :: SubLANGID
+ System.Win32: sUBLANG_ITALIAN_SWISS :: SubLANGID
+ System.Win32: sUBLANG_KASHMIRI_INDIA :: SubLANGID
+ System.Win32: sUBLANG_KOREAN :: SubLANGID
+ System.Win32: sUBLANG_LITHUANIAN :: SubLANGID
+ System.Win32: sUBLANG_MALAY_BRUNEI_DARUSSALAM :: SubLANGID
+ System.Win32: sUBLANG_MALAY_MALAYSIA :: SubLANGID
+ System.Win32: sUBLANG_NEPALI_INDIA :: SubLANGID
+ System.Win32: sUBLANG_NEUTRAL :: SubLANGID
+ System.Win32: sUBLANG_NORWEGIAN_BOKMAL :: SubLANGID
+ System.Win32: sUBLANG_NORWEGIAN_NYNORSK :: SubLANGID
+ System.Win32: sUBLANG_PORTUGUESE :: SubLANGID
+ System.Win32: sUBLANG_PORTUGUESE_BRAZILIAN :: SubLANGID
+ System.Win32: sUBLANG_SERBIAN_CYRILLIC :: SubLANGID
+ System.Win32: sUBLANG_SERBIAN_LATIN :: SubLANGID
+ System.Win32: sUBLANG_SPANISH :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_ARGENTINA :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_BOLIVIA :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_CHILE :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_COLOMBIA :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_COSTA_RICA :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_DOMINICAN_REPUBLIC :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_ECUADOR :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_EL_SALVADOR :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_GUATEMALA :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_HONDURAS :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_MEXICAN :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_MODERN :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_NICARAGUA :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_PANAMA :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_PARAGUAY :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_PERU :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_PUERTO_RICO :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_URUGUAY :: SubLANGID
+ System.Win32: sUBLANG_SPANISH_VENEZUELA :: SubLANGID
+ System.Win32: sUBLANG_SWEDISH :: SubLANGID
+ System.Win32: sUBLANG_SWEDISH_FINLAND :: SubLANGID
+ System.Win32: sUBLANG_SYS_DEFAULT :: SubLANGID
+ System.Win32: sUBLANG_URDU_INDIA :: SubLANGID
+ System.Win32: sUBLANG_URDU_PAKISTAN :: SubLANGID
+ System.Win32: sUBLANG_UZBEK_CYRILLIC :: SubLANGID
+ System.Win32: sUBLANG_UZBEK_LATIN :: SubLANGID
+ System.Win32: setLocaleInfo :: LCID -> LCTYPE -> String -> IO ()
+ System.Win32: setThreadLocale :: LCID -> IO ()
+ System.Win32: stringToUnicode :: CodePage -> String -> IO String
+ System.Win32: try' :: Storable a => String -> (Ptr a -> PDWORD -> IO BOOL) -> DWORD -> IO [a]
+ System.Win32: tryWithoutNull :: String -> (LPTSTR -> UINT -> IO UINT) -> UINT -> IO String
+ System.Win32: type CodePage = UINT
+ System.Win32: type LCMapFlags = DWORD
+ System.Win32: type LCTYPE = UINT
+ System.Win32: type LocaleTestFlags = DWORD
+ System.Win32: withMaybe :: Storable a => Maybe a -> (Ptr a -> IO b) -> IO b
+ System.Win32.Automation.Input: data MOUSEINPUT
+ System.Win32.Automation.Input: mOUSEEVENTF_ABSOLUTE :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_LEFTDOWN :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_LEFTUP :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_MIDDLEDOWN :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_MIDDLEUP :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_MOVE :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_RIGHTDOWN :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_RIGHTUP :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_WHEEL :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_XDOWN :: DWORD
+ System.Win32.Automation.Input: mOUSEEVENTF_XUP :: DWORD
+ System.Win32.Automation.Input: type PMOUSEINPUT = Ptr MOUSEINPUT
+ System.Win32.Automation.Input: xBUTTON1 :: DWORD
+ System.Win32.Automation.Input: xBUTTON2 :: DWORD

Files

Graphics/Win32.hs view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/Control.hsc view
@@ -1,6 +1,4 @@-#if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-}-#endif ----------------------------------------------------------------------------- -- | -- Module      :  Graphics.Win32.Control
Graphics/Win32/Dialogue.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI.hs view
@@ -1,6 +1,4 @@-#if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-}-#endif ----------------------------------------------------------------------------- -- | -- Module      :  Graphics.Win32.GDI@@ -21,7 +19,7 @@ -- The above warning supression flag is a temporary kludge. -- While working on this module you are encouraged to remove it and fix -- any warnings in the module. See---     http://hackage.haskell.org/trac/ghc/wiki/WorkingConventions#Warnings+--     https://ghc.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings -- for details  module Graphics.Win32.GDI (
Graphics/Win32/GDI/Bitmap.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/Brush.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/Clip.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/Font.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/Graphics2D.hs view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/HDC.hs view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/Palette.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/Path.hs view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/Pen.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/Region.hs view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/GDI/Types.hsc view
@@ -1,6 +1,4 @@-#if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-}-#endif ----------------------------------------------------------------------------- -- | -- Module      :  Graphics.Win32.GDI.Types
Graphics/Win32/Icon.hs view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/Key.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/Menu.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/Message.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/Misc.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/Resource.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
Graphics/Win32/Window.hsc view
@@ -1,8 +1,6 @@ {-# LANGUAGE CApiFFI #-} {-# LANGUAGE NegativeLiterals #-}-#if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-}-#endif ----------------------------------------------------------------------------- -- | -- Module      :  Graphics.Win32.Window
System/Win32.hs view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
System/Win32/Console.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709
 {-# LANGUAGE Safe #-}
-#elif __GLASGOW_HASKELL__ >= 701
+#else
 {-# LANGUAGE Trustworthy #-}
 #endif
 -----------------------------------------------------------------------------
@@ -41,7 +41,7 @@ ##include "windows_cconv.h"
 
 import System.Win32.Types
-import Graphics.Win32.Misc 
+import Graphics.Win32.Misc
 
 import Foreign.C.Types (CInt(..))
 import Foreign.C.String (withCWString, CWString)
System/Win32/DLL.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
System/Win32/DebugApi.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------@@ -66,7 +66,7 @@     | SingleStep     | StackOverflow     deriving (Show)-    + data DebugEventInfo     = UnknownDebugEvent     | Exception         ExceptionInfo Exception@@ -94,7 +94,7 @@     where         dwZero = 0 :: DWORD         wZero = 0 :: WORD-        +         rest (#const EXCEPTION_DEBUG_EVENT) p' = do             chance  <- (#peek EXCEPTION_DEBUG_INFO, dwFirstChance) p'             flags   <- (#peek EXCEPTION_RECORD, ExceptionFlags) p'@@ -121,7 +121,7 @@                 (#const EXCEPTION_PRIV_INSTRUCTION)         -> return PrivilegedInstruction                 (#const EXCEPTION_SINGLE_STEP)              -> return SingleStep                 (#const EXCEPTION_STACK_OVERFLOW)           -> return StackOverflow-                _                                           -> return UnknownException +                _                                           -> return UnknownException             return $ Exception (chance/=dwZero, flags==dwZero, addr) e          rest (#const CREATE_THREAD_DEBUG_EVENT) p' = do@@ -141,16 +141,16 @@             start   <- (#peek CREATE_PROCESS_DEBUG_INFO, lpStartAddress) p'             imgname <- (#peek CREATE_PROCESS_DEBUG_INFO, lpImageName) p'             --unicode <- (#peek CREATE_PROCESS_DEBUG_INFO, fUnicode) p'-            return $ CreateProcess proc +            return $ CreateProcess proc                         (file, imgbase, dbgoff, dbgsize, imgname) --, unicode/=wZero)                         (thread, local, start)-        +         rest (#const EXIT_THREAD_DEBUG_EVENT) p' =             (#peek EXIT_THREAD_DEBUG_INFO, dwExitCode) p' >>= return.ExitThread-        +         rest (#const EXIT_PROCESS_DEBUG_EVENT) p' =             (#peek EXIT_PROCESS_DEBUG_INFO, dwExitCode) p' >>= return.ExitProcess-        +         rest (#const LOAD_DLL_DEBUG_EVENT) p' = do             file    <- (#peek LOAD_DLL_DEBUG_INFO, hFile) p'             imgbase <- (#peek LOAD_DLL_DEBUG_INFO, lpBaseOfDll) p'@@ -158,7 +158,7 @@             dbgsize <- (#peek LOAD_DLL_DEBUG_INFO, nDebugInfoSize) p'             imgname <- (#peek LOAD_DLL_DEBUG_INFO, lpImageName) p'             --unicode <- (#peek LOAD_DLL_DEBUG_INFO, fUnicode) p'-            return $ +            return $                 LoadDll (file, imgbase, dbgoff, dbgsize, imgname)--, unicode/=wZero)          rest (#const OUTPUT_DEBUG_STRING_EVENT) p' = do@@ -166,7 +166,7 @@             unicode <- (#peek OUTPUT_DEBUG_STRING_INFO, fUnicode) p'             len     <- (#peek OUTPUT_DEBUG_STRING_INFO, nDebugStringLength) p'             return $ DebugString dat (unicode/=wZero) len-        +         rest (#const UNLOAD_DLL_DEBUG_EVENT) p' =             (#peek UNLOAD_DLL_DEBUG_INFO, lpBaseOfDll) p' >>= return.UnloadDll @@ -339,7 +339,7 @@     6 -> (#offset CONTEXT, Dr6)     7 -> (#offset CONTEXT, Dr7)     _ -> undefined-    + setReg :: Ptr a -> Int -> DWORD -> IO () setReg = pokeByteOff @@ -381,12 +381,12 @@  foreign import WINDOWS_CCONV "windows.h DebugActiveProcess"     c_DebugActiveProcess :: DWORD -> IO Bool-    + -- Windows XP -- foreign import WINDOWS_CCONV "windows.h DebugActiveProcessStop" --     c_DebugActiveProcessStop :: DWORD -> IO Bool -foreign import WINDOWS_CCONV "windows.h ReadProcessMemory" c_ReadProcessMemory :: +foreign import WINDOWS_CCONV "windows.h ReadProcessMemory" c_ReadProcessMemory ::     PHANDLE -> Ptr () -> Ptr Word8 -> DWORD -> Ptr DWORD -> IO BOOL  foreign import WINDOWS_CCONV "windows.h WriteProcessMemory" c_WriteProcessMemory ::
System/Win32/File.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
System/Win32/FileMapping.hsc view
@@ -1,6 +1,4 @@-#if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-}-#endif ----------------------------------------------------------------------------- -- | -- Module      :  System.Win32.FileMapping@@ -143,7 +141,7 @@             c_OpenFileMapping access inherit c_name  mapViewOfFileEx :: HANDLE -> FileMapAccess -> DDWORD -> SIZE_T -> Ptr a -> IO (Ptr b)-mapViewOfFileEx h access offset size base = +mapViewOfFileEx h access offset size base =     failIfNull "mapViewOfFile(Ex): c_MapViewOfFileEx" $         c_MapViewOfFileEx h access ohi olow size base     where@@ -162,7 +160,7 @@     c_OpenFileMapping :: DWORD -> BOOL -> LPCTSTR -> IO HANDLE  foreign import WINDOWS_CCONV "windows.h CreateFileMappingW"-    c_CreateFileMapping :: HANDLE -> Ptr () -> DWORD -> DWORD -> DWORD -> LPCTSTR -> IO HANDLE +    c_CreateFileMapping :: HANDLE -> Ptr () -> DWORD -> DWORD -> DWORD -> LPCTSTR -> IO HANDLE  foreign import WINDOWS_CCONV "windows.h MapViewOfFileEx"     c_MapViewOfFileEx :: HANDLE -> DWORD -> DWORD -> DWORD -> SIZE_T -> Ptr a -> IO (Ptr b)
System/Win32/Info.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------@@ -360,10 +360,10 @@  foreign import WINDOWS_CCONV unsafe "windows.h GetUserNameW"   c_GetUserName :: LPTSTR -> LPDWORD -> IO Bool-  + getUserName :: IO String-getUserName =     -  allocaArray 512 $ \ c_str -> +getUserName =+  allocaArray 512 $ \ c_str ->     with 512 $ \ c_len -> do         failIfFalse_ "GetUserName" $ c_GetUserName c_str c_len         len <- peek c_len
System/Win32/Mem.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
System/Win32/MinTTY.hsc view
@@ -2,7 +2,7 @@  #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------@@ -153,7 +153,7 @@  type F_NtQueryObject = HANDLE -> CInt -> Ptr OBJECT_NAME_INFORMATION                      -> ULONG -> Ptr ULONG -> IO NTSTATUS-                     + foreign import WINDOWS_CCONV "dynamic"   mk_NtQueryObject :: FunPtr F_NtQueryObject -> F_NtQueryObject 
System/Win32/NLS.hsc view
@@ -1,6 +1,4 @@-#if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-}-#endif ----------------------------------------------------------------------------- -- | -- Module      :  System.Win32.NLS
System/Win32/Path.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------@@ -53,5 +53,5 @@     _ <- localFree p_AbsPath     return path -foreign import WINDOWS_CCONV unsafe "Shlwapi.h PathRelativePathToW" +foreign import WINDOWS_CCONV unsafe "Shlwapi.h PathRelativePathToW"          c_pathRelativePathTo :: LPTSTR -> LPCTSTR -> DWORD -> LPCTSTR -> DWORD -> IO UINT
System/Win32/Process.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
System/Win32/Registry.hsc view
@@ -1,6 +1,4 @@-#if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-}-#endif ----------------------------------------------------------------------------- -- | -- Module      :  System.Win32.Registry
System/Win32/Security.hsc view
@@ -2,12 +2,10 @@ -- The above warning supression flag is a temporary kludge. -- While working on this module you are encouraged to remove it and fix -- any warnings in the module. See---     http://hackage.haskell.org/trac/ghc/wiki/WorkingConventions#Warnings+--     https://ghc.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings -- for details -#if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-}-#endif ----------------------------------------------------------------------------- -- | -- Module      :  System.Win32.Security@@ -22,7 +20,7 @@ -- ----------------------------------------------------------------------------- -module System.Win32.Security ( +module System.Win32.Security (         -- * Types         SID, PSID,         ACL, PACL,@@ -96,34 +94,34 @@     :: PSECURITY_DESCRIPTOR -- pSecurityDescriptor     -> Ptr SECURITY_DESCRIPTOR_CONTROL -- pControl     -> LPDWORD -- lpdwRevision-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h GetSecurityDescriptorDacl"-  c_getSecurityDescriptorDacl +  c_getSecurityDescriptorDacl     :: PSECURITY_DESCRIPTOR -- pSecurityDescriptor     -> LPBOOL -- lpbDaclPresent     -> Ptr PACL -- pDacl     -> LPBOOL -- lpbDaclDefaulted-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h GetSecurityDescriptorGroup"   c_getSecurityDescriptorGroup     :: PSECURITY_DESCRIPTOR -- pSecurityDescriptor     -> Ptr PSID -- pGroup     -> LPBOOL -- lpbGroupDefaulted-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h GetSecurityDescriptorLength"   c_getSecurityDescriptorLength     :: PSECURITY_DESCRIPTOR -- pSecurityDescriptor-    -> IO DWORD +    -> IO DWORD  foreign import WINDOWS_CCONV unsafe "windows.h GetSecurityDescriptorOwner"   c_getSecurityDescriptorOwner     :: PSECURITY_DESCRIPTOR -- pSecurityDescriptor     -> Ptr PSID -- pOwner     -> LPBOOL -- lpbOwnerDefaulted-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h GetSecurityDescriptorSacl"   c_getSecurityDescriptorSacl@@ -131,18 +129,18 @@     -> LPBOOL -- lpbSaclPresent     -> Ptr PACL -- pSacl     -> LPBOOL -- lpbSaclDefaulted-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h InitializeSecurityDescriptor"   c_initializeSecurityDescriptor     :: PSECURITY_DESCRIPTOR -- pSecurityDescriptor     -> DWORD -- dwRevision-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h IsValidSecurityDescriptor"   c_isValidSecurityDescriptor     :: PSECURITY_DESCRIPTOR -- pSecurityDescriptor-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h SetSecurityDescriptorDacl"   c_setSecurityDescriptorDacl@@ -150,21 +148,21 @@     -> BOOL -- bDaclPresent     -> PACL -- pDacl     -> BOOL -- bDaclDefaulted-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h SetSecurityDescriptorGroup"   c_setSecurityDescriptorGroup     :: PSECURITY_DESCRIPTOR -- pSecurityDescriptor     -> PSID -- pGroup     -> BOOL -- bGroupDefaulted-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h SetSecurityDescriptorOwner"   c_setSecurityDescriptorOwner     :: PSECURITY_DESCRIPTOR -- pSecurityDescriptor     -> PSID -- pOwner     -> BOOL -- bOwnerDefaulted-    -> IO BOOL +    -> IO BOOL  foreign import WINDOWS_CCONV unsafe "windows.h SetSecurityDescriptorSacl"   c_setSecurityDescriptorSacl@@ -172,7 +170,7 @@     -> BOOL -- bSaclPresent     -> PACL -- pSacl     -> BOOL -- bSaclDefaulted-    -> IO BOOL +    -> IO BOOL  -- --------------------------------------------------------------------------- @@ -190,7 +188,7 @@ -- , pROTECTED_DACL_SECURITY_INFORMATION = PROTECTED_DACL_SECURITY_INFORMATION -- , pROTECTED_SACL_SECURITY_INFORMATION = PROTECTED_SACL_SECURITY_INFORMATION -- , uNPROTECTED_DACL_SECURITY_INFORMATION = UNPROTECTED_DACL_SECURITY_INFORMATION--- , uNPROTECTED_SACL_SECURITY_INFORMATION = UNPROTECTED_SACL_SECURITY_INFORMATION +-- , uNPROTECTED_SACL_SECURITY_INFORMATION = UNPROTECTED_SACL_SECURITY_INFORMATION  getFileSecurity     :: String@@ -203,7 +201,7 @@   needed <- peek lpnLengthNeeded   fpSd <- mallocForeignPtrBytes (fromIntegral needed)   withForeignPtr fpSd $ \pSd -> do-  failIfFalse_ "getFileSecurity" $ +  failIfFalse_ "getFileSecurity" $     c_GetFileSecurity lpFileName si pSd needed lpnLengthNeeded   return (SecurityDescriptor fpSd) @@ -214,7 +212,7 @@     -> PSECURITY_DESCRIPTOR -- pSecurityDescriptor     -> DWORD -- nLength     -> LPDWORD -- lpnLengthNeeded-    -> IO BOOL +    -> IO BOOL  --foreign import WINDOWS_CCONV unsafe "windows.h AccessCheck" --  c_AccessCheck
System/Win32/Shell.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709
 {-# LANGUAGE Safe #-}
-#elif __GLASGOW_HASKELL__ >= 701
+#else
 {-# LANGUAGE Trustworthy #-}
 #endif
 -----------------------------------------------------------------------------
@@ -81,7 +81,7 @@     peekTString pstr
 
 raiseUnsupported :: String -> IO ()
-raiseUnsupported loc = 
+raiseUnsupported loc =
    ioError (ioeSetErrorString (mkIOError illegalOperationErrorType loc Nothing Nothing) "unsupported operation")
 
 foreign import WINDOWS_CCONV unsafe "SHGetFolderPathW"
System/Win32/SimpleMAPI.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------@@ -224,7 +224,7 @@     maybeWith withCAString pw   $ \c_pw  ->     alloca                      $ \out   -> do         mapiFail_ "MAPILogon: " $ mapifLogon-            f (maybeHWND hwnd) +            f (maybeHWND hwnd)             c_ses c_pw flags 0 out         peek out 
System/Win32/Time.hsc view
@@ -1,6 +1,6 @@ #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-}-#elif __GLASGOW_HASKELL__ >= 701+#else {-# LANGUAGE Trustworthy #-} #endif -----------------------------------------------------------------------------
System/Win32/Types.hsc view
@@ -1,7 +1,5 @@-#if __GLASGOW_HASKELL__ >= 701-{-# LANGUAGE Trustworthy #-}-#endif {-# LANGUAGE CPP #-}+{-# LANGUAGE Trustworthy #-} ----------------------------------------------------------------------------- -- | -- Module      :  System.Win32.Types
Win32.cabal view
@@ -1,5 +1,5 @@ name:		Win32-version:	2.8.0.0+version:	2.8.1.0 license:	BSD3 license-file:	LICENSE author:		Alastair Reid, shelarcy, Tamar Christina
changelog.md view
@@ -1,5 +1,11 @@ # Changelog for [`Win32` package](http://hackage.haskell.org/package/Win32) +## 2.8.1.0 *Nov 2018*++* Fix broken links (See #116)+* Remove unused CPP Lower bounds (See #114)+* GHC 8.8 release+ ## 2.8.0.0 *May 2018*  * Deprecated `regQueryValueKey`. (See #105, #108)