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