[htoolkit-cvs] HSQL/HSQL/Database/HSQL Types.hs,1.5,1.6

[<kr_...@us...>]

Update of /cvsroot/htoolkit/HSQL/HSQL/Database/HSQL
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30760/Database/HSQL

Modified Files:
	Types.hs 
Log Message:
stmtExecute should return Integer like connExecute


Index: Types.hs
===================================================================
RCS file: /cvsroot/htoolkit/HSQL/HSQL/Database/HSQL/Types.hs,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** Types.hs	4 Jan 2006 21:00:09 -0000	1.5
--- Types.hs	4 Jan 2006 22:19:57 -0000	1.6
***************
*** 134,138 ****
  		, stmtClose    :: IO ()
  		, stmtSetParam :: SqlValue -> IO ()
! 		, stmtExecute  :: IO ()
  		, stmtFetch    :: IO Bool
  		, stmtGetCol   :: forall a . Int -> FieldDef -> (FieldDef -> CString -> Int -> IO a) -> IO a
--- 134,138 ----
  		, stmtClose    :: IO ()
  		, stmtSetParam :: SqlValue -> IO ()
! 		, stmtExecute  :: IO Integer
  		, stmtFetch    :: IO Bool
  		, stmtGetCol   :: forall a . Int -> FieldDef -> (FieldDef -> CString -> Int -> IO a) -> IO a