mirror of
https://github.com/khibino/haskell-relational-record.git
synced 2024-12-16 07:52:05 +03:00
12 lines
246 B
Haskell
12 lines
246 B
Haskell
|
{-# LANGUAGE TemplateHaskell, MultiParamTypeClasses #-}
|
||
|
|
|
||
|
|
module Department where
|
||
|
|
|
||
|
|
import Prelude hiding (id)
|
||
|
|
import Database.Record.TH (derivingShow)
|
||
|
|
|
||
|
|
import DataSource (defineTable)
|
||
|
|
|
||
|
|
$(defineTable []
|
||
|
|
"LEARNINGSQL" "department" [derivingShow])
|