Update of /cvsroot/htoolkit/HSQL/SQLite/Database/HSQL
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7721/Database/HSQL
Modified Files:
SQLite2.hsc
Log Message:
use strict return.
Index: SQLite2.hsc
===================================================================
RCS file: /cvsroot/htoolkit/HSQL/SQLite/Database/HSQL/SQLite2.hsc,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** SQLite2.hsc 4 Jan 2006 08:19:49 -0000 1.3
--- SQLite2.hsc 4 Jan 2006 08:22:35 -0000 1.4
***************
*** 96,100 ****
handleSqlResult res ppMsg
changes <- sqlite_changes sqlite
! return (fromIntegral changes)
query :: Connection -> SQLite -> String -> IO Statement
--- 96,100 ----
handleSqlResult res ppMsg
changes <- sqlite_changes sqlite
! return $! fromIntegral changes
query :: Connection -> SQLite -> String -> IO Statement
|
