relational-query: apply internal namespace

This commit is contained in:
Kei Hibino 2017-02-13 21:00:28 +09:00
parent ecc2df9807
commit 2416a7bb81
5 changed files with 5 additions and 5 deletions

View File

@ -20,7 +20,7 @@ module Database.Relational.Query.Monad.Assign (
) where ) where
import Database.Relational.Query.Internal.Config (Config) import Database.Relational.Query.Internal.Config (Config)
import Database.Relational.Query.Sub (QueryRestriction) import Database.Relational.Query.Internal.Sub (QueryRestriction)
import Database.Relational.Query.Component (Assignments) import Database.Relational.Query.Component (Assignments)
import Database.Relational.Query.Context (Flat) import Database.Relational.Query.Context (Flat)
import Database.Relational.Query.Table (Table) import Database.Relational.Query.Table (Table)

View File

@ -21,7 +21,7 @@ module Database.Relational.Query.Monad.Restrict (
) where ) where
import Database.Relational.Query.Internal.Config (Config) import Database.Relational.Query.Internal.Config (Config)
import Database.Relational.Query.Sub (QueryRestriction) import Database.Relational.Query.Internal.Sub (QueryRestriction)
import Database.Relational.Query.Context (Flat) import Database.Relational.Query.Context (Flat)
import Database.Relational.Query.Projection (Projection) import Database.Relational.Query.Projection (Projection)
import Database.Relational.Query.Monad.Trans.Restricting import Database.Relational.Query.Monad.Trans.Restricting

View File

@ -21,7 +21,7 @@ import Control.Monad.Trans.State (StateT, runStateT, get, modify)
import Control.Applicative (Applicative) import Control.Applicative (Applicative)
import Control.Monad (liftM) import Control.Monad (liftM)
import Database.Relational.Query.Sub (Qualified) import Database.Relational.Query.Internal.Sub (Qualified)
import qualified Database.Relational.Query.Internal.Sub as Internal import qualified Database.Relational.Query.Internal.Sub as Internal

View File

@ -26,7 +26,7 @@ import Control.Applicative (Applicative, pure, (<$>))
import Control.Arrow (second) import Control.Arrow (second)
import Data.DList (DList, toList) import Data.DList (DList, toList)
import Database.Relational.Query.Sub (QueryRestriction, Projection) import Database.Relational.Query.Internal.Sub (QueryRestriction, Projection)
import Database.Relational.Query.Monad.Class import Database.Relational.Query.Monad.Class
(MonadQualify (..), MonadRestrict(..), MonadQuery (..), MonadAggregate(..)) (MonadQualify (..), MonadRestrict(..), MonadQuery (..), MonadAggregate(..))

View File

@ -15,7 +15,7 @@ module Database.Relational.Query.Monad.Type
) where ) where
import Database.Relational.Query.Component (Duplication) import Database.Relational.Query.Component (Duplication)
import Database.Relational.Query.Sub (JoinProduct, QueryRestriction) import Database.Relational.Query.Internal.Sub (JoinProduct, QueryRestriction)
import Database.Relational.Query.Context (Flat) import Database.Relational.Query.Context (Flat)
import Database.Relational.Query.Projection (Projection) import Database.Relational.Query.Projection (Projection)
import Database.Relational.Query.Projectable (PlaceHolders) import Database.Relational.Query.Projectable (PlaceHolders)