mirror of
https://github.com/khibino/haskell-relational-record.git
synced 2024-11-29 14:45:51 +03:00
20 lines
413 B
Haskell
20 lines
413 B
Haskell
{-# LANGUAGE TemplateHaskell #-}
|
|
{-# LANGUAGE FlexibleInstances #-}
|
|
{-# LANGUAGE MultiParamTypeClasses #-}
|
|
|
|
module SQLite3Test where
|
|
|
|
import Data.Time (UTCTime)
|
|
import Distribution.TestSuite (Test)
|
|
import SQLite3TestDataSource (defineTable)
|
|
|
|
tests :: IO [Test]
|
|
tests = return []
|
|
|
|
$(defineTable
|
|
[("date", [t| UTCTime |]),
|
|
("smallint", [t| Int |]),
|
|
("varchar", [t| String |])
|
|
]
|
|
"main" "test_table0" [])
|