mysql 0.1.1.3 → 0.1.1.4

raw patch · 3 files changed

+7/−3 lines, 3 files

Files

• Database/MySQL/Base.hs +1/−1
• Database/MySQL/Base/C.hsc +5/−1
• mysql.cabal +1/−1

@@ -554,7 +554,7 @@ withMaybeString Nothing act = act nullPtr withMaybeString (Just xs) act = withCString xs act -check :: Num a => String -> Connection -> a -> IO ()+check :: (Eq a, Num a) => String -> Connection -> a -> IO () check func conn r = unless (r == 0) $ connectionError func conn {-# INLINE check #-} 

@@ -1,4 +1,4 @@-{-# LANGUAGE EmptyDataDecls, ForeignFunctionInterface #-}+{-# LANGUAGE CPP, EmptyDataDecls, ForeignFunctionInterface #-}  -- | -- Module:      Database.MySQL.Base.C@@ -71,7 +71,11 @@ import Data.ByteString.Unsafe (unsafeUseAsCString) import Database.MySQL.Base.Types import Foreign.C.String (CString, withCString)+##if __GLASGOW_HASKELL__ >= 704+import Foreign.C.Types (CChar(..), CInt(..), CUInt(..), CULLong(..), CULong(..))+##else import Foreign.C.Types (CInt, CUInt, CULLong, CULong)+##endif import Foreign.Marshal.Utils (with) import Foreign.Ptr (Ptr, nullPtr) 

@@ -1,5 +1,5 @@ name:           mysql-version:        0.1.1.3+version:        0.1.1.4 homepage:       https://github.com/bos/mysql bug-reports:    https://github.com/bos/mysql/issues synopsis:       A low-level MySQL client library.