--- HDBC-odbc-2.3.1.0-orig/HDBC-odbc.cabal	2011-08-10 07:16:38.000000000 +1000
+++ HDBC-odbc-2.3.1.0/HDBC-odbc.cabal	2011-08-12 14:51:43.510895477 +1000
@@ -37,10 +37,10 @@
     ExistentialQuantification,
     ForeignFunctionInterface,
     ScopedTypeVariables
-  Build-Depends: base >= 4.3.1.0 && < 5
+  Build-Depends: base >= 4.2.0.2 && < 5
                , mtl
                , HDBC>=2.1.0
-               , time>=1.2.0.3
+               , time>=1.1.4
                , utf8-string
                , bytestring
   GHC-Options: -O2
--- HDBC-odbc-2.3.1.0-orig/Database/HDBC/ODBC/Statement.hsc	2011-08-10 07:16:38.000000000 +1000
+++ HDBC-odbc-2.3.1.0/Database/HDBC/ODBC/Statement.hsc	2011-08-12 15:16:11.585672600 +1000
@@ -17,7 +17,7 @@
 import Database.HDBC.ODBC.Utils
 import Database.HDBC.ODBC.TypeConv
 
-import Foreign.C.String (castCUCharToChar)
+import GHC.Base (unsafeChr)
 import Foreign.C.Types
 import Foreign.ForeignPtr
 import Foreign.Ptr
@@ -55,6 +55,10 @@
 #let CALLCONV = "ccall"
 #endif
 
+-- | Convert a C @unsigned char@, representing a Latin-1 character, to
+-- the corresponding Haskell character.
+castCUCharToChar :: CUChar -> Char
+castCUCharToChar ch = unsafeChr (fromIntegral (fromIntegral ch :: Word8))
 fGetQueryInfo :: Conn -> ChildList -> String
               -> IO ([SqlColDesc], [(String, SqlColDesc)])
 fGetQueryInfo iconn children query =