@@ -79,7 +79,7 @@ instance IxMonadTrans PQ where
79instance MonadBase b m => MonadBase b (PQ m db db) where
79instance MonadBase b m => MonadBase b (PQ m db db) where
80 liftBase = ilift . liftBase
80 liftBase = ilift . liftBase
82−type PQRun db = forall n b. Monad n => PQ n db db b -> n (b, Connection db)
82+type PQRun db = forall m x. Monad m => PQ m db db x -> m (x, Connection db)
84pqliftWith :: Functor m => (PQRun db -> m a) -> PQ m db db a
84pqliftWith :: Functor m => (PQRun db -> m a) -> PQ m db db a
85pqliftWith f = PQ $ \ conn ->
85pqliftWith f = PQ $ \ conn ->