-- | Run 'R.ReaderT' in the base monad
runReaderC
  :: Monad m =>
     r -> ConduitM b o (R.ReaderT r m) () -> ConduitM b o m ()
runReaderC r p = (`R.runReaderT` r) $ distribute p
runReaderC
  :: Monad m =>
     r -> ConduitM b o (R.ReaderT r m) () -> ConduitM b o m ()
runReaderC r p = (`R.runReaderT` r) $ distribute p
runReaderC r p = (`R.runReaderT` r) $ distribute p