Weaken too strong constraint.

This commit is contained in:
Kei Hibino 2013-08-23 16:09:51 +09:00
parent 3929ce8d9c
commit 16acbcf3ef

View File

@ -72,7 +72,7 @@ runPreparedKeyUpdate a = executeNoFetch . bindToKeyUpdate a
-- | Prepare insert statement, bind parameters,
-- execute statement and get execution result.
runKeyUpdate :: (IConnection conn, ToSql SqlValue a, ToSql SqlValue p)
runKeyUpdate :: (IConnection conn, ToSql SqlValue a)
=> conn
-> a
-> KeyUpdate p a