1
1
mirror of https://github.com/khibino/haskell-relational-record.git synced 2024-12-22 03:01:45 +03:00
haskell-relational-record/relational-join-HDBC-pgTest/sample/1/Group.hs
Kei Hibino 7e98380848 Move sample codes into another package.
--HG--
rename : schema-th/pgTest/PgTest.hs => relational-join-HDBC-pgTest/pgTest/PgTest.hs
rename : schema-th/pgTest/PgTestDataSource.hs => relational-join-HDBC-pgTest/pgTest/PgTestDataSource.hs
rename : schema-th/pgTest/runCreate.sh => relational-join-HDBC-pgTest/pgTest/runCreate.sh
rename : schema-th/pgTest/runDrop.sh => relational-join-HDBC-pgTest/pgTest/runDrop.sh
rename : schema-th/sample/1/Group.hs => relational-join-HDBC-pgTest/sample/1/Group.hs
rename : schema-th/sample/1/Membership.hs => relational-join-HDBC-pgTest/sample/1/Membership.hs
rename : schema-th/sample/1/README => relational-join-HDBC-pgTest/sample/1/README
rename : schema-th/sample/1/User.hs => relational-join-HDBC-pgTest/sample/1/User.hs
rename : schema-th/sample/1/create.sh => relational-join-HDBC-pgTest/sample/1/create.sh
rename : schema-th/sample/1/drop.sh => relational-join-HDBC-pgTest/sample/1/drop.sh
rename : schema-th/sample/1/querySample.hs => relational-join-HDBC-pgTest/sample/1/querySample.hs
2013-05-13 19:24:31 +09:00

12 lines
238 B
Haskell

{-# LANGUAGE TemplateHaskell, MultiParamTypeClasses #-}
module Group where
import Prelude hiding (id)
import PgTestDataSource (defineTable)
import Database.Record.TH (derivingShow)
$(defineTable []
"SAMPLE1" "group" [derivingShow])