rr-quickcheck: apply namespace switch of relational-query.

This commit is contained in:
Kei Hibino 2017-07-30 15:55:49 +09:00
parent bbb3835b9d
commit 4d764495f6
3 changed files with 5 additions and 5 deletions

View File

@ -15,8 +15,8 @@ import Test.QuickCheck (Arbitrary (..), Gen, elements, listOf, frequency)
import Control.Applicative ((<$>), pure, (<*>))
import Data.Int (Int64)
import Database.Record
import Database.Relational.Query
import Database.Relational.Query.Pi.Unsafe (unsafeExpandIndexes)
import Database.Relational
import Database.Relational.Pi.Unsafe (unsafeExpandIndexes)
import Test.Relational.QuickCheck.Model

View File

@ -7,8 +7,8 @@ module Test.Relational.QuickCheck.Model (
import GHC.Generics (Generic)
import Data.Int (Int64)
import qualified Database.Relational.Query.Table as Table
import Database.Relational.Query (Relation, table, TableDerivable (derivedTable))
import qualified Database.Relational.Table as Table
import Database.Relational (Relation, table, TableDerivable (derivedTable))
import Database.HDBC.Query.TH (makeRelationalRecord)

View File

@ -15,7 +15,7 @@ import Data.List (sort)
import Database.HDBC (IConnection, rollback, SqlValue)
import Database.HDBC.Session (withConnectionIO')
import Database.Record (FromSql, ToSql)
import Database.Relational.Query
import Database.Relational
import Database.HDBC.Record (runQuery', runInsert)
import Test.Relational.QuickCheck.Model