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

Eta reduce.

Browse Source
This commit is contained in:
Kei Hibino 2014-12-10 14:43:45 +09:00
parent 7d33e26f44
commit 624763abc6
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
doc/examples/DataSource.hs
View File

@ -13,8 +13,7 @@ connect :: IO Connection
connect = connectPostgreSQL "dbname=testdb"
defineTable :: [(String, TypeQ)] -> String -> String -> [ConName] -> Q [Dec]
defineTable tmap scm tbl derives =
defineTable tmap =
defineTableFromDB
connect
(driverPostgreSQL { typeMap = tmap })
scm tbl derives