mirror of
https://github.com/khibino/haskell-relational-record.git
synced 2024-12-14 14:22:59 +03:00
12 lines
242 B
Haskell
12 lines
242 B
Haskell
|
{-# LANGUAGE TemplateHaskell, MultiParamTypeClasses #-}
|
||
|
|
|
||
|
|
module Customer where
|
||
|
|
|
||
|
|
import Prelude hiding (id)
|
||
|
|
import Database.Record.TH (derivingShow)
|
||
|
|
|
||
|
|
import DataSource (defineTable)
|
||
|
|
|
||
|
|
$(defineTable []
|
||
|
|
"LEARNINGSQL" "customer" [derivingShow])
|