diff --git a/DB/HSQL/ODBC/Core.hsc b/DB/HSQL/ODBC/Core.hsc
--- a/DB/HSQL/ODBC/Core.hsc
+++ b/DB/HSQL/ODBC/Core.hsc
@@ -49,7 +49,7 @@
 
 
 -- | 
-getFieldDefs:: HSTMT -> Ptr a -> SQLUSMALLINT -> SQLUSMALLINT -> IO [FieldDef]
+getFieldDefs:: HSTMT -> Ptr a -> SQLUSMALLINT -> SQLUSMALLINT -> IO [ColDef]
 getFieldDefs hSTMT pFIELD n count
     | n > count  = return []
     | otherwise = do
@@ -72,7 +72,7 @@
 
 
 -- | 
-moveToFirstResult :: HSTMT -> Ptr a -> IO [FieldDef]
+moveToFirstResult :: HSTMT -> Ptr a -> IO [ColDef]
 moveToFirstResult hSTMT pFIELD = do
   res <- sqlNumResultCols hSTMT ((#ptr FIELD, fieldsCount) pFIELD)
   handleSqlResult sqlHandleStmt hSTMT res
@@ -126,7 +126,7 @@
 
     | res == sqlInvalidHandle = throw SqlInvalidHandle
     | res == sqlStillExecuting = throw SqlStillExecuting
-    | res == sqlNeedData = throw SqlNeedData
+    | res == sqlNeedData = throw SqlNeedMoreData
     | res == sqlError = do
 	getSqlError >>= throw
     | otherwise = error (show res)
@@ -139,7 +139,7 @@
 		  res <- sqlGetDiagRec handleType handle 1 
                                        pState pNative pMsg 256 pTextLen
 		  if res == sqlNoData
-		    then return SqlNoData
+		    then return SqlNoMoreData
 		    else do
 		      state  <- peekCString pState
 		      native <- peek pNative
@@ -154,7 +154,7 @@
 
 
 -- |
-getColValue :: HSTMT -> CString -> Int -> FieldDef -> (FieldDef -> CString -> Int -> IO a) -> IO a
+getColValue :: HSTMT -> CString -> Int -> ColDef -> (ColDef -> CString -> Int -> IO a) -> IO a
 getColValue hSTMT buffer colNumber fieldDef f = do
   (res,len_or_ind) <- getData buffer (fromIntegral stmtBufferSize)
   if len_or_ind == sqlNullData
diff --git a/DB/HSQL/ODBC/Type.hsc b/DB/HSQL/ODBC/Type.hsc
--- a/DB/HSQL/ODBC/Type.hsc
+++ b/DB/HSQL/ODBC/Type.hsc
@@ -23,8 +23,6 @@
 type SQLLEN       = SQLINTEGER
 type SQLULEN      = SQLINTEGER
 
-type SQL = String
-
 -- |
 mkSqlType :: SQLSMALLINT -> SQLULEN -> SQLSMALLINT -> SqlType
 mkSqlType sqlChar         size    _    = SqlChar (fromIntegral size)
diff --git a/Database/HSQL/ODBC.hs b/Database/HSQL/ODBC.hs
--- a/Database/HSQL/ODBC.hs
+++ b/Database/HSQL/ODBC.hs
@@ -20,7 +20,7 @@
 import Control.Concurrent.MVar(newMVar)
 import System.IO.Unsafe(unsafePerformIO)
 
-import DB.HSQL.ODBC.Type(HDBC,SQLRETURN,HENV,HENVRef,mkSqlType,SQL)
+import DB.HSQL.ODBC.Type(HDBC,SQLRETURN,HENV,HENVRef,mkSqlType)
 import DB.HSQL.ODBC.Functions
 import DB.HSQL.ODBC.Core(handleSqlResult,withStatement)
 
@@ -144,7 +144,7 @@
 odbcDescribe :: Connection 
              -> HDBC -- ^ ODBC handle
              -> String -- ^ table name
-             -> IO [FieldDef]
+             -> IO [ColDef]
 odbcDescribe connection hDBC table = do
   stmt <- withStatement connection hDBC (odbcSqlColumns table)
   collectRows getColumnInfo stmt
diff --git a/hsql-odbc.cabal b/hsql-odbc.cabal
--- a/hsql-odbc.cabal
+++ b/hsql-odbc.cabal
@@ -1,5 +1,5 @@
 name:		hsql-odbc
-version:	1.8.1.1
+version:	1.8.2
 Synopsis:	A Haskell Interface to ODBC. 
 license:	BSD3
 License-file:	 LICENSE
@@ -13,7 +13,7 @@
   DB.HSQL.ODBC.Functions
   DB.HSQL.ODBC.Status
   DB.HSQL.ODBC.Core
-build-depends:	base >= 4 && < 5, hsql >= 1.8, old-time >= 1.0.0.1
+build-depends:	base >= 4 && < 5, hsql >= 1.8.2, old-time >= 1.0.0.1
 extensions:     ForeignFunctionInterface, CPP
 include-dirs:   Database/HSQL
 c-sources:      Database/HSQL/HsODBC.c