khibino/haskell-relational-record
1
1
Fork 0
mirror of https://github.com/khibino/haskell-relational-record.git synced 2024-12-12 12:09:08 +03:00
Code Issues Projects Releases Wiki Activity

Cleaning up instance imports.

Browse Source
This commit is contained in:
Kei Hibino 2013-05-09 17:42:12 +09:00
parent 80b45bd1bf
commit 791833b03a
6 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
schema-th/src/Database/HDBC/Record/Persistable.hs
View File

@ -17,7 +17,6 @@ import Database.Record.Persistable
PersistableValue (persistableValue), derivedPersistableSingleton,
Persistable (persistable))
import qualified Database.Record.Persistable as Persistable
import Database.HDBC.SqlValueExtra ()
import Database.HDBC.Record.TH (derivePersistableInstancesFromConvertibleSqlValues)
import Data.Convertible (Convertible)

1
schema-th/src/Database/HDBC/Record/TH.hs
View File

@ -14,6 +14,7 @@ import Language.Haskell.TH
Info (ClassI), reify, runIO)
import Data.Convertible (Convertible)
import Database.HDBC (SqlValue)
import Database.HDBC.SqlValueExtra ()
import Database.Record.Persistable
(Persistable(persistable), derivedPersistableRecord, PersistableWidth(persistableWidth))
import Database.Record.FromSql (FromSql(recordFromSql), recordFromSql')

1
schema-th/src/Database/HDBC/Schema/IBMDB2.hs
View File

@ -27,7 +27,6 @@ import qualified Language.Haskell.TH.Name.Extra as TH
import Database.HDBC (IConnection, SqlValue)
import Database.HDBC.SqlValueExtra ()
import Database.HDBC.Record.Query (runQuery', listToUnique)
import Database.HDBC.Record.Persistable ()

1
schema-th/src/Database/HDBC/Schema/PgCatalog/PgAttribute.hs
View File

@ -15,7 +15,6 @@ import Data.Int (Int16, Int32)
import Database.HDBC (SqlValue)
import Database.HDBC.SqlValueExtra ()
import Database.HDBC.Record.Persistable ()
import Database.Record.TH (derivingShow)

1
schema-th/src/Database/HDBC/Schema/PgCatalog/PgType.hs
View File

@ -15,7 +15,6 @@ import Data.Int (Int16, Int32)
import Database.HDBC (SqlValue)
import Database.HDBC.SqlValueExtra ()
import Database.HDBC.Record.Persistable ()
import Database.Record.TH (derivingShow)

2
schema-th/src/Database/HDBC/Schema/PostgreSQL.hs
View File

@ -26,8 +26,6 @@ import Data.Time
import Database.HDBC (IConnection)
import Database.HDBC.SqlValueExtra ()
import qualified Database.Relational.Query.Table as Table
import Database.Relational.Query.Type (unsafeTypedQuery)
import Database.Relational.Query (Query(untypeQuery))