haskell-relational-record/relational-query-HDBC-pgTest/example/3/SetA.hs

11 lines
257 B
Haskell

{-# LANGUAGE TemplateHaskell, MultiParamTypeClasses, FlexibleInstances #-}
module SetA where
import Prelude hiding (seq)
import PgTestDataSource (defineTable)
import Database.Record.TH (derivingShow)
$(defineTable []
"EXAMPLE3" "set_a" [derivingShow])