relational-record-examples-0.5.0.0: entity/Transaction.hs

{-# LANGUAGE TemplateHaskell, MultiParamTypeClasses, FlexibleInstances, DeriveGeneric, DataKinds #-}

module Transaction where

import Database.Relational (Relation)
import Database.Record.TH.SQLite3 (defineTable)

$(defineTable "examples.db" "transaction0")

type Transaction = Transaction0

transaction :: Relation () Transaction
transaction = transaction0