Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

Loading…

build on ghc-7.4 #1

Merged
merged 1 commit into from

3 participants

yihuang Greg Weber Bryan O'Sullivan
yihuang

No description provided.

Bryan O'Sullivan bos merged commit 6fe0407 into from
Greg Weber

please release this on hackage.

Deleted user

please release this on hackage

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Commits on Jan 31, 2012
  1. yihuang

    build on ghc-7.4

    yihuang authored
This page is out of date. Refresh to see the latest.
Showing with 1 addition and 1 deletion.
  1. +1 −1  Database/MySQL/Base.hs
2  Database/MySQL/Base.hs
View
@@ -554,7 +554,7 @@ withMaybeString :: Maybe String -> (CString -> IO a) -> IO a
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 #-}
Something went wrong with that request. Please try again.