summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKeiHibino <>2017-11-26 06:21:00 (GMT)
committerhdiff <hdiff@hdiff.luite.com>2017-11-26 06:21:00 (GMT)
commitdd967b8b8822b8df1b38cd3c798be8f4a7c1a02d (patch)
treeeca81b623f752c80f1489198a63a97802797a8bf
parenta8db72fcb89bc61be0f9996503a9adcdb070e597 (diff)
version 0.1.4.20.1.4.2
-rw-r--r--ChangeLog.md6
-rw-r--r--relational-schemas.cabal4
-rw-r--r--src/Database/Relational/Schema/DB2Syscat/Columns.hs2
-rw-r--r--src/Database/Relational/Schema/DB2Syscat/Config.hs2
-rw-r--r--src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs2
-rw-r--r--src/Database/Relational/Schema/DB2Syscat/Tabconst.hs2
-rw-r--r--src/Database/Relational/Schema/IBMDB2.hs2
-rw-r--r--src/Database/Relational/Schema/MySQL.hs2
-rw-r--r--src/Database/Relational/Schema/MySQLInfo/Columns.hs2
-rw-r--r--src/Database/Relational/Schema/MySQLInfo/Config.hs2
-rw-r--r--src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs2
-rw-r--r--src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs2
-rw-r--r--src/Database/Relational/Schema/Oracle.hs2
-rw-r--r--src/Database/Relational/Schema/OracleDataDictionary/Config.hs2
-rw-r--r--src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs2
-rw-r--r--src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs2
-rw-r--r--src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs2
-rw-r--r--src/Database/Relational/Schema/PgCatalog/Config.hs2
-rw-r--r--src/Database/Relational/Schema/PgCatalog/PgAttribute.hs2
-rw-r--r--src/Database/Relational/Schema/PgCatalog/PgClass.hs2
-rw-r--r--src/Database/Relational/Schema/PgCatalog/PgConstraint.hs2
-rw-r--r--src/Database/Relational/Schema/PgCatalog/PgNamespace.hs2
-rw-r--r--src/Database/Relational/Schema/PgCatalog/PgType.hs2
-rw-r--r--src/Database/Relational/Schema/PostgreSQL.hs2
-rw-r--r--src/Database/Relational/Schema/SQLServer.hs16
-rw-r--r--src/Database/Relational/Schema/SQLServerSyscat/Columns.hs2
-rw-r--r--src/Database/Relational/Schema/SQLServerSyscat/Config.hs2
-rw-r--r--src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs2
-rw-r--r--src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs2
-rw-r--r--src/Database/Relational/Schema/SQLServerSyscat/Types.hs2
-rw-r--r--src/Database/Relational/Schema/SQLite3.hs2
-rw-r--r--src/Database/Relational/Schema/SQLite3Syscat/Config.hs2
-rw-r--r--src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs2
-rw-r--r--src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs2
-rw-r--r--src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs2
35 files changed, 45 insertions, 45 deletions
diff --git a/ChangeLog.md b/ChangeLog.md
index d968473..f6a19c3 100644
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,12 +1,12 @@
<!-- -*- Markdown -*- -->
-## 0.1.5.0
+## 0.1.4.2
-- apply relational-query-0.10.0
+- add an upper bound of version constraint.
## 0.1.4.1
-- apply relational-query-0.9.5
+- update version constraint.
## 0.1.4.0
diff --git a/relational-schemas.cabal b/relational-schemas.cabal
index d153957..6f6ba35 100644
--- a/relational-schemas.cabal
+++ b/relational-schemas.cabal
@@ -1,5 +1,5 @@
name: relational-schemas
-version: 0.1.5.0
+version: 0.1.4.2
synopsis: RDBMSs' schema templates for relational-query
description: This package contains some RDBMSs' schema structure definitions.
Supported RDBMS schemas are below:
@@ -80,7 +80,7 @@ library
, time
, bytestring
- , relational-query >= 0.10
+ , relational-query >= 0.9.5 && < 0.10
if impl(ghc == 7.4.*)
build-depends: ghc-prim == 0.2.*
diff --git a/src/Database/Relational/Schema/DB2Syscat/Columns.hs b/src/Database/Relational/Schema/DB2Syscat/Columns.hs
index 678e5c2..3b0a7b4 100644
--- a/src/Database/Relational/Schema/DB2Syscat/Columns.hs
+++ b/src/Database/Relational/Schema/DB2Syscat/Columns.hs
@@ -16,7 +16,7 @@ module Database.Relational.Schema.DB2Syscat.Columns where
import GHC.Generics (Generic)
import Data.Int (Int16, Int32, Int64)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.DB2Syscat.Config (config)
diff --git a/src/Database/Relational/Schema/DB2Syscat/Config.hs b/src/Database/Relational/Schema/DB2Syscat/Config.hs
index 91b5d99..8061ae7 100644
--- a/src/Database/Relational/Schema/DB2Syscat/Config.hs
+++ b/src/Database/Relational/Schema/DB2Syscat/Config.hs
@@ -8,7 +8,7 @@
-- Portability : unknown
module Database.Relational.Schema.DB2Syscat.Config (config) where
-import Database.Relational (Config (..), ProductUnitSupport (..), defaultConfig)
+import Database.Relational.Query (Config (..), ProductUnitSupport (..), defaultConfig)
-- | Configuration parameter against IBM DB2.
diff --git a/src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs b/src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs
index cb63c09..83a81de 100644
--- a/src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs
+++ b/src/Database/Relational/Schema/DB2Syscat/Keycoluse.hs
@@ -18,7 +18,7 @@ module Database.Relational.Schema.DB2Syscat.Keycoluse where
import GHC.Generics (Generic)
import Data.Int (Int16)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.DB2Syscat.Config (config)
diff --git a/src/Database/Relational/Schema/DB2Syscat/Tabconst.hs b/src/Database/Relational/Schema/DB2Syscat/Tabconst.hs
index 38fc13b..bdddc60 100644
--- a/src/Database/Relational/Schema/DB2Syscat/Tabconst.hs
+++ b/src/Database/Relational/Schema/DB2Syscat/Tabconst.hs
@@ -17,7 +17,7 @@
module Database.Relational.Schema.DB2Syscat.Tabconst where
import GHC.Generics (Generic)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.DB2Syscat.Config (config)
diff --git a/src/Database/Relational/Schema/IBMDB2.hs b/src/Database/Relational/Schema/IBMDB2.hs
index c827894..ebacb45 100644
--- a/src/Database/Relational/Schema/IBMDB2.hs
+++ b/src/Database/Relational/Schema/IBMDB2.hs
@@ -26,7 +26,7 @@ import qualified Data.Map as Map
import Data.Time (LocalTime, Day)
import Language.Haskell.TH (TypeQ)
-import Database.Relational
+import Database.Relational.Query
(Query, relationalQuery, Relation, query, relation',
wheres, (.=.), (!), (><), placeholder, asc, value)
diff --git a/src/Database/Relational/Schema/MySQL.hs b/src/Database/Relational/Schema/MySQL.hs
index 986ff62..4da9a03 100644
--- a/src/Database/Relational/Schema/MySQL.hs
+++ b/src/Database/Relational/Schema/MySQL.hs
@@ -18,7 +18,7 @@ import Data.ByteString (ByteString)
import Control.Applicative ((<|>))
import Language.Haskell.TH (TypeQ)
-import Database.Relational ( Query
+import Database.Relational.Query ( Query
, relationalQuery
, query
, relation'
diff --git a/src/Database/Relational/Schema/MySQLInfo/Columns.hs b/src/Database/Relational/Schema/MySQLInfo/Columns.hs
index a708672..d1ac443 100644
--- a/src/Database/Relational/Schema/MySQLInfo/Columns.hs
+++ b/src/Database/Relational/Schema/MySQLInfo/Columns.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.MySQLInfo.Columns where
import GHC.Generics (Generic)
import Data.Int (Int16)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.MySQLInfo.Config (config)
diff --git a/src/Database/Relational/Schema/MySQLInfo/Config.hs b/src/Database/Relational/Schema/MySQLInfo/Config.hs
index af06a2a..cb15c9a 100644
--- a/src/Database/Relational/Schema/MySQLInfo/Config.hs
+++ b/src/Database/Relational/Schema/MySQLInfo/Config.hs
@@ -8,7 +8,7 @@
-- Portability : unknown
module Database.Relational.Schema.MySQLInfo.Config (config) where
-import Database.Relational (Config (..), defaultConfig)
+import Database.Relational.Query (Config (..), defaultConfig)
-- | Configuration parameter against MySQL.
diff --git a/src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs b/src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs
index dc3c7f5..fc17d70 100644
--- a/src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs
+++ b/src/Database/Relational/Schema/MySQLInfo/KeyColumnUsage.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.MySQLInfo.KeyColumnUsage where
import GHC.Generics (Generic)
import Data.Int (Int16)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.MySQLInfo.Config (config)
diff --git a/src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs b/src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs
index dd509c1..37a3ef3 100644
--- a/src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs
+++ b/src/Database/Relational/Schema/MySQLInfo/TableConstraints.hs
@@ -5,7 +5,7 @@
module Database.Relational.Schema.MySQLInfo.TableConstraints where
import GHC.Generics (Generic)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.MySQLInfo.Config (config)
diff --git a/src/Database/Relational/Schema/Oracle.hs b/src/Database/Relational/Schema/Oracle.hs
index 70bdcbd..575a220 100644
--- a/src/Database/Relational/Schema/Oracle.hs
+++ b/src/Database/Relational/Schema/Oracle.hs
@@ -14,7 +14,7 @@ import Data.Time (LocalTime)
import Language.Haskell.TH (TypeQ)
-import Database.Relational
+import Database.Relational.Query
import Database.Relational.Schema.OracleDataDictionary.ConsColumns (dbaConsColumns)
import qualified Database.Relational.Schema.OracleDataDictionary.ConsColumns as ConsCols
diff --git a/src/Database/Relational/Schema/OracleDataDictionary/Config.hs b/src/Database/Relational/Schema/OracleDataDictionary/Config.hs
index b3c8e94..ce66593 100644
--- a/src/Database/Relational/Schema/OracleDataDictionary/Config.hs
+++ b/src/Database/Relational/Schema/OracleDataDictionary/Config.hs
@@ -8,7 +8,7 @@
-- Portability : unknown
module Database.Relational.Schema.OracleDataDictionary.Config (config) where
-import Database.Relational (Config, defaultConfig)
+import Database.Relational.Query (Config, defaultConfig)
-- | Configuration parameter against Oracle.
diff --git a/src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs b/src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs
index 131e58c..5a1f1c6 100644
--- a/src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs
+++ b/src/Database/Relational/Schema/OracleDataDictionary/ConsColumns.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.OracleDataDictionary.ConsColumns where
import GHC.Generics (Generic)
import Data.Int (Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.OracleDataDictionary.Config (config)
diff --git a/src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs b/src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs
index 31f41c4..ca3b93f 100644
--- a/src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs
+++ b/src/Database/Relational/Schema/OracleDataDictionary/Constraints.hs
@@ -5,7 +5,7 @@
module Database.Relational.Schema.OracleDataDictionary.Constraints where
import GHC.Generics (Generic)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.OracleDataDictionary.Config (config)
diff --git a/src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs b/src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs
index e2717c5..57973e1 100644
--- a/src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs
+++ b/src/Database/Relational/Schema/OracleDataDictionary/TabColumns.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.OracleDataDictionary.TabColumns where
import GHC.Generics (Generic)
import Data.Int (Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.OracleDataDictionary.Config (config)
diff --git a/src/Database/Relational/Schema/PgCatalog/Config.hs b/src/Database/Relational/Schema/PgCatalog/Config.hs
index fda3e77..627fd29 100644
--- a/src/Database/Relational/Schema/PgCatalog/Config.hs
+++ b/src/Database/Relational/Schema/PgCatalog/Config.hs
@@ -8,7 +8,7 @@
-- Portability : unknown
module Database.Relational.Schema.PgCatalog.Config (config) where
-import Database.Relational (Config, defaultConfig)
+import Database.Relational.Query (Config, defaultConfig)
-- | Configuration parameter against PostgreSQL.
diff --git a/src/Database/Relational/Schema/PgCatalog/PgAttribute.hs b/src/Database/Relational/Schema/PgCatalog/PgAttribute.hs
index 6f5efb7..cbe5804 100644
--- a/src/Database/Relational/Schema/PgCatalog/PgAttribute.hs
+++ b/src/Database/Relational/Schema/PgCatalog/PgAttribute.hs
@@ -14,7 +14,7 @@ module Database.Relational.Schema.PgCatalog.PgAttribute where
import GHC.Generics (Generic)
import Data.Int (Int16, Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.PgCatalog.Config (config)
diff --git a/src/Database/Relational/Schema/PgCatalog/PgClass.hs b/src/Database/Relational/Schema/PgCatalog/PgClass.hs
index 4ee0310..feebd50 100644
--- a/src/Database/Relational/Schema/PgCatalog/PgClass.hs
+++ b/src/Database/Relational/Schema/PgCatalog/PgClass.hs
@@ -14,7 +14,7 @@ module Database.Relational.Schema.PgCatalog.PgClass where
import GHC.Generics (Generic)
import Data.Int (Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.PgCatalog.Config (config)
diff --git a/src/Database/Relational/Schema/PgCatalog/PgConstraint.hs b/src/Database/Relational/Schema/PgCatalog/PgConstraint.hs
index 068321b..c18dda6 100644
--- a/src/Database/Relational/Schema/PgCatalog/PgConstraint.hs
+++ b/src/Database/Relational/Schema/PgCatalog/PgConstraint.hs
@@ -14,7 +14,7 @@ module Database.Relational.Schema.PgCatalog.PgConstraint where
import GHC.Generics (Generic)
import Data.Int (Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.PgCatalog.Config (config)
diff --git a/src/Database/Relational/Schema/PgCatalog/PgNamespace.hs b/src/Database/Relational/Schema/PgCatalog/PgNamespace.hs
index 263f207..55f8f84 100644
--- a/src/Database/Relational/Schema/PgCatalog/PgNamespace.hs
+++ b/src/Database/Relational/Schema/PgCatalog/PgNamespace.hs
@@ -14,7 +14,7 @@ module Database.Relational.Schema.PgCatalog.PgNamespace where
import GHC.Generics (Generic)
import Data.Int (Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.PgCatalog.Config (config)
diff --git a/src/Database/Relational/Schema/PgCatalog/PgType.hs b/src/Database/Relational/Schema/PgCatalog/PgType.hs
index daba60f..f8baf70 100644
--- a/src/Database/Relational/Schema/PgCatalog/PgType.hs
+++ b/src/Database/Relational/Schema/PgCatalog/PgType.hs
@@ -14,7 +14,7 @@ module Database.Relational.Schema.PgCatalog.PgType where
import GHC.Generics (Generic)
import Data.Int (Int16, Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.PgCatalog.Config (config)
diff --git a/src/Database/Relational/Schema/PostgreSQL.hs b/src/Database/Relational/Schema/PostgreSQL.hs
index b0fe605..26e717d 100644
--- a/src/Database/Relational/Schema/PostgreSQL.hs
+++ b/src/Database/Relational/Schema/PostgreSQL.hs
@@ -34,7 +34,7 @@ import Data.Time
(DiffTime, NominalDiffTime,
LocalTime, ZonedTime, Day, TimeOfDay)
-import Database.Relational
+import Database.Relational.Query
(Query, relationalQuery, Relation, query, query', relation', relation, union,
wheres, (.=.), (.>.), in', values, (!), fst', snd',
placeholder, asc, value, unsafeProjectSql, (><))
diff --git a/src/Database/Relational/Schema/SQLServer.hs b/src/Database/Relational/Schema/SQLServer.hs
index 7cacfa6..66039d0 100644
--- a/src/Database/Relational/Schema/SQLServer.hs
+++ b/src/Database/Relational/Schema/SQLServer.hs
@@ -17,10 +17,10 @@ import Data.Char (toLower)
import Data.Int (Int8, Int16, Int32, Int64)
import Data.Map (Map)
import Data.Time (LocalTime, Day, TimeOfDay)
-import Database.Relational (Query, Relation, PlaceHolders, Record, Flat,
- (!), (.=.), (><), asc, relationalQuery, just, placeholder',
- query, relation', unsafeShowSql,
- unsafeProjectSql, wheres)
+import Database.Relational.Query (Query, Relation, PlaceHolders, Projection, Flat,
+ (!), (.=.), (><), asc, relationalQuery, just, placeholder',
+ query, relation', unsafeShowSql,
+ unsafeProjectSql, wheres)
import Database.Relational.Schema.SQLServerSyscat.Columns
import Database.Relational.Schema.SQLServerSyscat.Indexes
import Database.Relational.Schema.SQLServerSyscat.IndexColumns
@@ -75,14 +75,14 @@ getType mapFromSql rec@((cols,typs),typScms) = do
then typ
else [t|Maybe $(typ)|]
-sqlsrvTrue :: Record Flat Bool
+sqlsrvTrue :: Projection Flat Bool
sqlsrvTrue = unsafeProjectSql "1"
-sqlsrvObjectId :: Record Flat String -> Record Flat String -> Record Flat Int32
+sqlsrvObjectId :: Projection Flat String -> Projection Flat String -> Projection Flat Int32
sqlsrvObjectId s t = unsafeProjectSql $
"OBJECT_ID(" ++ unsafeShowSql s ++ " + '.' + " ++ unsafeShowSql t ++ ")"
-sqlsrvOidPlaceHolder :: (PlaceHolders (String, String), Record Flat Int32)
+sqlsrvOidPlaceHolder :: (PlaceHolders (String, String), Projection Flat Int32)
sqlsrvOidPlaceHolder = (nsParam >< relParam, oid)
where
(nsParam, (relParam, oid)) =
@@ -98,7 +98,7 @@ columnTypeRelation = relation' $ do
wheres $ cols ! Columns.userTypeId' .=. typs ! Types.userTypeId'
wheres $ cols ! Columns.objectId' .=. oid
asc $ cols ! Columns.columnId'
- return (params, cols >< typs >< sqlsrvSchemaName (typs ! Types.schemaId' :: Record Flat Int32))
+ return (params, cols >< typs >< sqlsrvSchemaName (typs ! Types.schemaId' :: Projection Flat Int32))
where
(params, oid) = sqlsrvOidPlaceHolder
sqlsrvSchemaName i = unsafeProjectSql $
diff --git a/src/Database/Relational/Schema/SQLServerSyscat/Columns.hs b/src/Database/Relational/Schema/SQLServerSyscat/Columns.hs
index d16aabb..74f44d0 100644
--- a/src/Database/Relational/Schema/SQLServerSyscat/Columns.hs
+++ b/src/Database/Relational/Schema/SQLServerSyscat/Columns.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.SQLServerSyscat.Columns where
import GHC.Generics (Generic)
import Data.Int (Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.SQLServerSyscat.Config (config)
diff --git a/src/Database/Relational/Schema/SQLServerSyscat/Config.hs b/src/Database/Relational/Schema/SQLServerSyscat/Config.hs
index 3a9c30e..4fd544b 100644
--- a/src/Database/Relational/Schema/SQLServerSyscat/Config.hs
+++ b/src/Database/Relational/Schema/SQLServerSyscat/Config.hs
@@ -8,7 +8,7 @@
-- Portability : unknown
module Database.Relational.Schema.SQLServerSyscat.Config (config) where
-import Database.Relational (Config, defaultConfig)
+import Database.Relational.Query (Config, defaultConfig)
-- | Configuration parameter against SQLServer.
diff --git a/src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs b/src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs
index 29c9110..88a05e2 100644
--- a/src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs
+++ b/src/Database/Relational/Schema/SQLServerSyscat/IndexColumns.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.SQLServerSyscat.IndexColumns where
import GHC.Generics (Generic)
import Data.Int (Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.SQLServerSyscat.Config (config)
diff --git a/src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs b/src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs
index 8abab2b..8151536 100644
--- a/src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs
+++ b/src/Database/Relational/Schema/SQLServerSyscat/Indexes.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.SQLServerSyscat.Indexes where
import GHC.Generics (Generic)
import Data.Int (Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.SQLServerSyscat.Config (config)
diff --git a/src/Database/Relational/Schema/SQLServerSyscat/Types.hs b/src/Database/Relational/Schema/SQLServerSyscat/Types.hs
index b6be33e..2d6c3cf 100644
--- a/src/Database/Relational/Schema/SQLServerSyscat/Types.hs
+++ b/src/Database/Relational/Schema/SQLServerSyscat/Types.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.SQLServerSyscat.Types where
import GHC.Generics (Generic)
import Data.Int (Int32)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.SQLServerSyscat.Config (config)
diff --git a/src/Database/Relational/Schema/SQLite3.hs b/src/Database/Relational/Schema/SQLite3.hs
index cf6b270..883cfb0 100644
--- a/src/Database/Relational/Schema/SQLite3.hs
+++ b/src/Database/Relational/Schema/SQLite3.hs
@@ -15,7 +15,7 @@ import Data.Char (toLower, toUpper)
import Data.Int (Int8, Int16, Int32, Int64)
import Data.Map (Map)
import Data.Time (Day, LocalTime)
-import Database.Relational (Query, unsafeTypedQuery)
+import Database.Relational.Query (Query, unsafeTypedQuery)
import Database.Relational.Schema.SQLite3Syscat.IndexInfo
import Database.Relational.Schema.SQLite3Syscat.IndexList
import Database.Relational.Schema.SQLite3Syscat.TableInfo
diff --git a/src/Database/Relational/Schema/SQLite3Syscat/Config.hs b/src/Database/Relational/Schema/SQLite3Syscat/Config.hs
index 4469e7b..ebf563c 100644
--- a/src/Database/Relational/Schema/SQLite3Syscat/Config.hs
+++ b/src/Database/Relational/Schema/SQLite3Syscat/Config.hs
@@ -8,7 +8,7 @@
-- Portability : unknown
module Database.Relational.Schema.SQLite3Syscat.Config (config) where
-import Database.Relational (Config, defaultConfig)
+import Database.Relational.Query (Config, defaultConfig)
-- | Configuration parameter against SQLite3.
diff --git a/src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs b/src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs
index 1e233fd..93802aa 100644
--- a/src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs
+++ b/src/Database/Relational/Schema/SQLite3Syscat/IndexInfo.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.SQLite3Syscat.IndexInfo where
import GHC.Generics (Generic)
import Data.Int (Int64)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.SQLite3Syscat.Config (config)
diff --git a/src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs b/src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs
index fe5b524..4f958f2 100644
--- a/src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs
+++ b/src/Database/Relational/Schema/SQLite3Syscat/IndexList.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.SQLite3Syscat.IndexList where
import GHC.Generics (Generic)
import Data.Int (Int64)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.SQLite3Syscat.Config (config)
diff --git a/src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs b/src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs
index 6222685..93fe569 100644
--- a/src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs
+++ b/src/Database/Relational/Schema/SQLite3Syscat/TableInfo.hs
@@ -6,7 +6,7 @@ module Database.Relational.Schema.SQLite3Syscat.TableInfo where
import GHC.Generics (Generic)
import Data.Int (Int16, Int64)
-import Database.Relational.TH (defineTableTypesAndRecord)
+import Database.Relational.Query.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.SQLite3Syscat.Config (config)