khibino/haskell-relational-record
1
1
Fork 0
mirror of https://github.com/khibino/haskell-relational-record.git synced 2024-12-12 12:09:08 +03:00
Code Issues Projects Releases Wiki Activity

Fix haddock markup.

Browse Source
This commit is contained in:
Kei Hibino 2013-05-11 03:29:57 +09:00
parent 17cfd474b4
commit 2816a2fd5e
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
DB-record/src/Database/Record/ToSql.hs
View File

@ -60,8 +60,9 @@ instance ToSql q () where
fromRecord :: ToSql q a => a -> [q]
fromRecord = runFromRecord recordToSql
-- | Expect update form like
-- "UPDATE <table> SET c0 = ?, c1 = ?, ..., cn = ? WHERE key = ? "
-- | SQL values expected by update form like
--
-- /UPDATE <table> SET c0 = ?, c1 = ?, ..., cn = ? WHERE key = ?/
updateValuesByUnique' :: RecordToSql q ra
-> KeyConstraint Unique ra
-> ra